Dieses vorgehensweise habe ich auch schon in einigen Projekten angewendet, nur beim diesen nicht. Weil das erstmal nicht gewünscht war.
Delphi-Quellcode:
with dm.mqr_TEMP
do
begin
cbx_feld.Clear;
cbx_feldItems.Add('
');
Close;
Sql.text := '
SELECT Bezeichnung FROM Fahrzeugen ORDER BY Bezeichnung ASC';
Open;
First;
While not Eof
do
begin
cbx_feldItems.Add(Fieldbyname('
Bezeichnung ').AsString;
next;
end;
Close;
cbx_feld.ItemIndex := 0;
end;
Es ist aber sehr umständit. wenn ich von Datensaz zum Datensatz springe, dann muss ich immer den Richtigen wert in die CBX_FELD setzen.