impedir que mi aplicacion se cierre

[jeremiselxi]

hola amigos del club, tengo una duda, estoy haciendo un programa que me habra varias paginas de internet explorer algunas 50 en un timer, pero ese no es el punto, el punto es que cuando tu le das alt+F4 al form1 se me cierra el exe, o cuando tu abres el administrador de tareas (ctrl+atl+supr) lo cierra desde ahi, o le da un click derecho al programa en la barra y le da a cerrar, y quisiera saber si me pueden decir como puedo controlar para que mi aplicacion al tu pisar alt+f4 diga ejemplo "no se puede cerrar" ya sea en showmessage, o algo, o como puedo controlar el programa para que cuando intenten cerrar el programa ya sea de diferentes formas me salga el mensaje que puse mas arriba, para que me termine de abrir las 50 paginas.
gracias de antemano.

[egostar]

Hola

Lo que yo uso normalmente es el evento OnClose de la forma pero también puedes usar el evento OnCloseQuery.


procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
if MessageDlg('En serio quieres cerrar el programa ??????', mtInformation,
mbYesNOCancel, 0) = mrYes then begin
Action := caFree; //:(
end
else begin
Action := caNone; //:)
end;
end;


Salud OS

[jeremiselxi]

Muchas gracias mi hermano eso era lo que queria