Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Error Property already defined by lookupfield (https://www.clubdelphi.com/foros/showthread.php?t=65148)

Viky 24-11-2009 14:42:22

Error Property already defined by lookupfield
 
Desde el form1, creo el form2, luego el showmodal, y por ultimo el release:

Código Delphi [-]
 
Código Delphi [-] Application.CreateForm(Tffordendecompra, ffordendecompra);
ffordendecompra.ShowModal ;
 
ffordendecompra.Release ;

La primera vez q desde el form1 llama al form2 no da ningun tipo de error,
pero cuando el ffordendecompra se cierra, vuelvo al form1 y llamo de nuevo
al form2 me da el sgte error:
"Property already defined by lookupfield".
El error da luego de ejecutar:

Código Delphi [-]Application.CreateForm(Tffordendecompra, ffordendecompra);



antes de FormCreate y del ShowModal.
Como puedo hacer para averiguar cual de los componentes esta generando el error?
En el form2 hay varios TDBLookupComboBox.
Como el error da antes de create me es imposible saber donde esta el problema.

Gracias
Viky.

rgstuamigo 24-11-2009 15:30:04

Creo que el error te da por que el metodo release solo libera el formulario cuando todos los eventos de los controles y componentes del formulario hayan terminado.
Lo normal y comun para liberar un Objeto es utilizando el método Free;
Código Delphi [-]
...
...
ffordendecompra.Free; ;)
Saludos...:)

Viky 24-11-2009 16:12:29

Probe con el método Free, pero me sigue dando el mismo error.


Viky.

rgstuamigo 24-11-2009 16:21:25

Cita:

Empezado por Viky (Mensaje 347324)
Probe con el método Free, pero me sigue dando el mismo error.


Viky.

Pues algo raro entonces esta pasando:rolleyes: .De todas manera la forma mas correcta de crear y destruir una instancia en delphi deberia estar dentro de los bloque try_finally
algo asi:
Código Delphi [-]
var  MyForm:Tffordendecompra; //declaro un objeto
begin
    MyForm:=Tffordendecompra.Create(nil);//Creo(Instancio) el Objeto
      try
        MyForm.ShowModal;
      finally
        MyForm.Free;//Libero el objeto.
      end;
end;
Prueba y luego nos comentas;)
Saludos...:)


La franja horaria es GMT +2. Ahora son las 17:41:53.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi