Cita:
Empezado por BrunoBsso
Por si todavía te queda alguna duda, el OnCloseQuery (significa CuandoPidenCerrarlo más o menos) lo que hace es dispararse cuando alguien intenta cerrarlo y si está asignado ejecuta lo que pidas, luego verifica si vos permitís cerrarlo (el pparámetro CanClose) y si es TRUE lo cierra, sino simplemente no se cierra.
Ejemplo:
Un formulario con un TRadioGroup con 2 items. Cerrar (índice 0) permite cerrarlo y No Cerrar (índice 1) obviamente no lo permite. El evento OnCloseQuery lo verificará todo.
Código Delphi [-]
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
case RadioGroup1.ItemIndex of
0: CanClose:=True; //Le permito cerrar
1: CanClose:=False; //No le permito cerrar
end;
end;
Saludos! |
Como ya lo dije antes es bueno aprender algo nuevo todos los dias, y saber manejar los eventos de los formularios es algo importante ,algo q aprendi ayer fue usar el evento OnShow.. Tu ejemplo de como usar el evento OnCloseQuery es muy bueno de seguro me va ser muy ùtil, gracias.
Saludos .