Combobox und Datenbank

[semo]

wenn man eine datenmenge öffnet und diese dann der reihe nach durchlaufen will, sollte man den zeiger auf den ersten datensatz setzen per First().

Delphi-Quellcode:

begin
  with ComboBox do
  begin
    Items.Clear;
    Query.SQL.Text := 'SELECT id, nickname FROM tbl ORDER BY nickname';
    Query.Open;
    Query.First;
    while not Query.Eof do
    begin
      Items.AddObject(Query.FieldByName('NICKNAME').AsString, Pointer(Query.FieldByName('ID').AsInteger));
      Query.Next;
    end;
    Query.Close;
  end;
end;