Foros Club Delphi - Como cambiar propiedas a DBLookUpCombobox

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)

- - Como cambiar propiedas a DBLookUpCombobox (https://www.clubdelphi.com/foros/showthread.php?t=45582)

Como cambiar propiedas a DBLookUpCombobox

Hola foristas, el problema es el siguiente, debo cambiar en tiempo de ejectucion las propiedades ListSource, ListField y KeyField del DBLookUpCombox, cuando las cambio en tiempo de ejecucion por primera vez no hay problema, pero cuando luego voy a cambiar nuevamente estas propiedades, dice que no encuentro el campo clave de la tabla que estaba visualizando antes, el codigo es este.

Código:



procedure TfREPORTES.Button2Click(Sender: TObject);

begin

  EBuscarPlaca.ListSource:=Form1.DataSoruce1;

  EBuscarPlaca.ListSource.DataSet:=Form1.Table1;

  EBuscarPlaca.ListField:='Campo1';

  EBuscarPlaca.KeyField:='Campo1';

end;



procedure TfREPORTES.Button3Click(Sender: TObject);

begin

  EBuscarPlaca.ListSource:=Form1.Datasource2;

  EBuscarPlaca.ListSource.DataSet:=Form1.Table2;

  EBuscarPlaca.KeyField:='Campo2';

  EBuscarPlaca.ListField:='Campo2';

end;

una idea, que tal si pruebas con disabe y enable controls del dataset??

Prueba con esta idea:

Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject);
begin
Dblk1.ListField:='';
Dblk1.KeyField:='';
Dblk1.DataSource:=Nil;
Dblk1.ListSource:=DataSource2;
Dblk1.ListField:='Profesor';
Dblk1.KeyField:='Profesor';
end;

Un Saludo.