Ver Mensaje Individual
  #1  
Antiguo 04-08-2004
MaJeSTiC MaJeSTiC is offline
Miembro
 
Registrado: jul 2004
Ubicación: Villa Urquiza Cap. Fed - Buenos Aires - Argentina
Posts: 30
Reputación: 0
MaJeSTiC Va por buen camino
Talking Cerrar MDI y Application.MessageBox

Hola Amigos, tengo otra pregunta que quizas uds me podrian responder. es hacerca de un Form MDI ke tengo. Ahora bien quiero cerrarlo pero antes quiero que me de la posibilidad de preguntarme si realmente lo quiero.

escribi esto:

procedure TMainFormMDI.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
if Application.MessageBox('Desea Continuar...','Esta a punto de cerrar xxx',mb_OkCancel+mb_IconExclamation)= IdOk
then Close;
end;
end.

pero al hacer click en el boton de cancelar, cierra igual. lo mismo con el boton de la cruz.

desde ya muchas gracias y estaremosnos viendo pronto
Responder Con Cita