Foros Club Delphi

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 11:26:38.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi