Hallo!
ich habe eine combobox mit Daten wie folgt gefüllt:
Delphi-Quellcode:
with cmbVerb do
begin
DM.qeVerb.Close;
DM.qeVerb.Sql.Clear;
DM.qeVerb.Sql.Add('Select ' +#10+
'ID_KONTORAHMEN, ' +#10+
'KONTO_NR, ' +#10+
'BEZEICHNUNG ' +#10+
'From KONTORAHMEN '+#10+
'WHERE KONTO_NR <9999 and KONTO_NR >0 ' +#10+
'ORDER BY KONTO_NR, BEZEICHNUNG ASC'
);
DM.qeVerb.Active := True;
Items.Clear;
with DM.qeVerb do
begin
While not Eof do
begin
Items.ADD(FieldByName('KONTO_NR').AsString+' | '+FieldByName('BEZEICHNUNG').AsString);
next;
end;
end;
end;
nun möchte ich mit OnSelect aus der
query die richtige Kontonummer an ein TEdtit weitergeben.
leider habe ich keinen Eintrag im Forum gefunden.
könnte mir jemand auf die sprünge helfen.
danke
Rosch
[edit=Sharky]Delphi-Tags gesetzt. Mfg, Sharky[/edit]