Ciro, para qué necesitas deshabilitarlo? Si puedes controlarlo en el evento "OnClose", hay un campo en LINKAGE al cual si le mueves POW-FALSE no cierra el Form!
De todos modos se puede hacer por WinAPI, tengo un ejemplo en casa, intentaré pasártelo esta tarde.
Añadido despues de 2 horas 10 minutos
Ciro, pon este código en el evento "Opened" del Form donde quieres deshabilitar el botón de cerrar:
Código COBOL:
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-HWND PIC S9(9) COMP-5.
01 WS-HWND-M PIC S9(9) COMP-5.
01 WS-HWND-P PIC S9(9) COMP-5.
PROCEDURE DIVISION.
MOVE "hwnd" OF POW-SELF TO WS-HWND
CALL "GetParent" WITH STDCALL USING BY VALUE WS-HWND
RETURNING WS-HWND-P
CANCEL "GetParent"
CALL "GetSystemMenu" WITH STDCALL USING BY VALUE WS-HWND-P POW-FALSE
RETURNING WS-HWND-M
CANCEL "GetSystemMenu"
CALL "DeleteMenu" WITH STDCALL USING BY VALUE WS-HWND-M
BY VALUE h"F060"
BY VALUE 0
CANCEL "DeleteMenu"