ANDRES86
07-07-2007, 22:29:02
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.
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;
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;