Tema: antes de cerrar genere un mesaje
Ver Mensaje Individual
  #2  
Antiguo 01-11-2005
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
  
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Reputación: 27
delphi.com.ar Va por buen camino
 
Código Delphi [-]
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  with Application do
    CanClose := MessageBox('¿Desea cerrar?', PChar(Title), MB_ICONQUESTION + MB_YESNO) = IDYES;
end;
Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita