Den Inhalt kompletten Inhalt eines Feldes in einer Combobox

[horst]

Danke für eure Hilfe, bekomme dennoch immer nur einen Eintrag angezeigt, obwohl 3 in der Datenbank stehen.

[edit]

es klappt nun:

Delphi-Quellcode:

procedure TForm1.Button16Click(Sender: TObject);
begin
  listbox2.clear;
  with abfrage do
  begin
    close;
    SQL.Text := 'SELECT katname FROM hckategorie ORDER BY katname';
    try
      open;
    except
    end;
    if recordcount > 0 then
    begin
      first;
      repeat
        Listbox2.Items.Add(fieldbyname('katname').asstring);
        next;
      until eof;
    end;
  end;
end;