Datenbankeinträge in ComboBoxen zur Anzeige bringen.

[RWarnecke]

Eine andere Varinate wäre noch, Du gehst direkt über eine Query.

So zu Beipsiel :

Delphi-Quellcode:

with TZQuery do begin
  SQL.Clear
  SQL.Text := 'Select * from tabelle where feld1=1';
  Open;
  Active := true;
  while not eof do
  begin
    Combobox1.Items.Add(FieldByName('Feld2').AsString);
  end;
  Active := false;
  Close;
end;

So fülle ich immer meine Listen oder Boxen. Ich benutze garnichtmehr die TDBxxx-Komponenten.