Foros Club Delphi - Boton cerrar del formulario (X)

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)

- - Boton cerrar del formulario (X) (https://www.clubdelphi.com/foros/showthread.php?t=809)

Un abrazo

26-05-2003 13:03:09

Boton cerrar del formulario (X)

Me gustaría desactivar el boton X del formulario y no se que propiedad tengo que utilizar para ello.

Un abraaazo

judoboy

26-05-2003 13:51:20

En la propiedad BorderIcons, en BiSystemMenu, puedes deshabilitar el botón X, pero tambien deshabilitas el maximizar y minimizar

roman

26-05-2003 16:26:54

Para deshabilitar el botón cerrar sin deshabilitar el resto puedes usar esta función

Código:

procedure EnableSysCloseItem(Handle: HWND; Enable: Boolean);

const

   Flags : array[Boolean] of Integer = (MF_GRAYED, MF_ENABLED);



var

  SysMenu : HMENU;



begin

  SysMenu := GetSystemMenu(Handle, false);

  EnableMenuItem(SysMenu, SC_CLOSE, MF_BYCOMMAND or Flags[Enable]);

end;

// Saludos

La franja horaria es GMT +2. Ahora son las 23:48:12.