Mam następujący problem:
Powiedzmy że mam bazę o dwóch kolumnach: Imię i Nazwisko.
Jak zmusić listę wyboru DbLookupComboBox, aby pojawiły się w jej liscie np. nazwiska z bazy, a po wyborze nazwiska, odpowiadające mu w bazie imię zostało wpisane np. do komponentu Label.
Z góry dziękuję za wszystkie odpowiedzi.
zakładam że masz na formie
TTable (aktywny := True)
TDataSource1 (Dataset := Table1)
TDBLookupComboBox1:
(Datasource, DataField - wyczyszczone)
ustawiasz ListSource := DataSource1
potem KeyField na Nazwisko
ListField na Nazwisko
Events OnClick dla DBLookupComboBox1:
procedure TForm1.DBLookupComboBox1Click(Sender: TObject);
begin
label1.Caption:=table1.Fields[0].AsString ; // jesli imię masz jako 1
lub
label1.Caption:=Table1.FieldByName('Imie').AsString ;
end;
możesz też to wsadzić do AfterScroll dla Table1
Faktycznie pomogło.
Serdecznie dziękuję i pozdrawiam.