Code: Select all
liteQuery1.SQL.Text := 'SELECT projektnummer, bauprojekt, bauort from firmenprojekte order by projektnummer';
liteQuery1.Open;
while not liteQuery1.Eof do
begin
cbx_auswahl_projekte.Items.Add(liteQuery1.FieldByName('projektnummer').AsString);
cbx_ausw2.Items.Add(liteQuery1.FieldByName('bauprojekt').AsString);
cbx_ausw3.Items.Add(liteQuery1.FieldByName('bauort').AsString);
liteQuery1.Next;
end;
Who can help me?
Thanks Jmich