Evitar que cierren la form con Alt-F4  

Enviado Por: Q3 Team
Web : www.q3.nu
Email: dlib@q3.nu
Fecha: 20/01/00

Truco accedido 106 veces

 


Basta con que pongas en el evento OnCloseQuery de tu form el siguiente código:


 	procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
 	begin
   	  CanClose:=FALSE;
 	end;




Y sólo se podrá cerrar la ventana con la opcion que tu pongas para ello.



Aclaración para despistados:


Si quieres cerrar tu aplicación desde un botón (por ejemplo), basta con que ejecutes:


 Application.Terminate;




Actualizado el 19/01/2000