Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   impedir que mi aplicacion se cierre (https://www.clubdelphi.com/foros/showthread.php?t=60397)

jeremiselxi 01-10-2008 04:48:42

impedir que mi aplicacion se cierre
 
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 01-10-2008 05:17:21

Hola

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

Código Delphi [-]
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 03-10-2008 23:59:21

Gracias
 
Muchas gracias mi hermano eso era lo que queria


La franja horaria es GMT +2. Ahora son las 17:17:12.

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