perdon roman a si es el tengo un form padre que nada mas se debe cerrar
a los hijos les active el kepreview y en el evento onkey press puse el codigo
Código Delphi
[-]
procedure TForm3.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key = #27 then
begin
close;
end
end;
y en el FormCloseQuery
Código:
procedure TForm3.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if Application.MessageBox( 'Desea salir de la ventana Nueva Factura?','¡ATENCION!',
MB_ICONQUESTION OR MB_YESNO Or mb_DefButton2) = ID_NO then
canclose:=False;
end;
pero te digo yo quiero que cuando se cierre el form padre aunque esten abiertos los hijos, no me pregunte uno por uno solo que se cierre y ya
graxxxx...