Ver Mensaje Individual
  #1  
Antiguo 31-03-2012
Avatar de newtron
[newtron] newtron is offline
Membrillo Premium
 
Registrado: abr 2007
Ubicación: Motril, Granada
Posts: 3.473
Reputación: 21
newtron Va camino a la fama
¿Cómo saber si un formulario está creado?

Hola a tod@s.

Para hacer consultas de tablas tengo un formulario especial de la clase TForm llamado TNTConsulta. Cuando quiero hacer una llamada al mismo lo declaro como una variable local, lo creo y llamo a una función del mismo, de la siguiente manera:

Código Delphi [-]
procedure TNTFormTraspasos.SpeedButton1Click(Sender: TObject);
var
DialogoConsulta: TNTConsulta;
begin
  DialogoConsulta:=TNTConsulta.Create(nil);
  DialogoConsulta.ConsultaConFiltro2('Consulta de articulos',Tabla,1,3,'CODIGO',Filtro);
  if DialogoConsulta.ModalResult = mrOK then 
     EditArticulo.Text:=DialogoConsulta.Valor;
  DialogoConsulta.Free;
end;

.... bien, por otros temas necesito saber si la variable DialogoConsulta ha pasado ya por el .Create. He probado a ver si es igual a nil pero no lo es y con el depurador no se puede saber el valor que tiene hasta que no se ha creado, o sea, que no sé qué valor tiene antes de pasar por el .create.

No se si me he explicado con claridad.

Gracias y un saludo
__________________
Be water my friend.
Responder Con Cita