Foros Club Delphi - Como evitar que el usuario cierre la form!

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

- API de Windows (https://www.clubdelphi.com/foros/forumdisplay.php?f=7)

- - Como evitar que el usuario cierre la form! (https://www.clubdelphi.com/foros/showthread.php?t=5389)

Como evitar que el usuario cierre la form!

Hola.

Tengo el siguiente problema.

Necesito evitar que el usuario cierre la form con la X situada en la esquina superior derecha, cuando se este realizando alguna operación llamese alta o algun otro proceso. Que debo hacer para que el usuario no la cierre, almenos que no se realice ninguna operacion sobre la form!!!
De antemano Gracias :)

Usa el evento OnCloseQuery y, dependiendo de si se está llevando a cabo o no una operación pones el parámetro CanClose en false o true.

// Saludos

Para ampliar la respuesta de roman.

En tu aplicación coloca en el OnClose y OnCloseQuery de la Form:

Código:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);

begin

   Action:=caNone;

end;



ó



procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);

begin

   CanClose:=False;

end;

Cualquiera funciona para que no lo cierren con ALT+F4. Puedes usar uno de ellos o los dos.

http://www.clubdelphi.com/foros/show...hlight=Onclose

Otros temas que te pueden ayudar.

http://www.clubdelphi.com/foros/show...&threadid=2184

http://www.clubdelphi.com/foros/show...&threadid=2003