Ver Mensaje Individual
  #4  
Antiguo 07-11-2005
Avatar de epuigdef
epuigdef epuigdef is offline
Miembro
 
Registrado: jul 2005
Posts: 196
Reputación: 21
epuigdef Va por buen camino
Ya me imaginaba que te daba el error en esta línea, pero el tema está en dónde creas la instancia de frmprovincia. En algún lugar no lejos de ahí y un poco más arriba debería estar la creación, del tipo

Código Delphi [-]
   frmProvincia := TFrmProvincia.create(nil);

Y más abajo la destrucción:

Código Delphi [-]
   frmProvincia.free;


En general, cuando se usa un formulario modal la estructura es la siguiente:


Código Delphi [-]
  function recuperarDato : String;
  var frmProvincia : TFrmProvincia;
       temporal  String;
  begin
      frmProvincia := TFrmProvincia.create(Nil);
      try
         if frmProvincia.showmodal = mrOk then
            temporal := frmProvincia.EditProvincia.text
         else
            temporal := '';
 
     finally
       frmProvincia.free;
     end;
   
     recuperardato := temporal;
  end;

Un saludo

Edu
Responder Con Cita