[salvica]

Pues eso, que tengo una ventana que la utilizo en varias aplicaciones y necesito saber cuando se cierra con el botón correspondiente o cuando la cierran de otra forma.

En una unidad aparte, tengo lo siguiente:

Código Delphi [-]
unit capturas;
 
 interface
 uses
   QForms;
 
   function  CrearTendencia( rACTUAL, rANTERIOR:real ):string;
 
 implementation
 uses
   winModal { Win_Modal },
   fnCadenas;
 
   function  CrearTendencia( rACTUAL, rANTERIOR:real ):string;
   var
     AcabarBucle      : TModalResult;
     RespuestaBucle   : boolean;
   begin
     if not bES_SYNOP then exit;
     repeat
     { evitar ta tecla ESC }
       Application.CreateForm(TWin_Modal, Win_Modal);
       with Win_Modal do begin
            ShowModal;
            AcabarBucle  := ModalResult;
            Free;
       end;
     until( AcabarBucle=mrOK ); //-------> ¡ERROR! No reconoce "mrOK"
   end;
 
 end.

La ayuda de Delphi (para TModalResult con CLX) dice que mrOk, mrCancel, ..., etc. se encuentra en QForms, pero estoy desesperado (sé que lo he hecho, pero no recuerdo como , será que me está entrando la "programa-pausia")

Gracias a tod@s
Salvador