ComboBoxen mit Daten füllen

[marabu]

Hallo,

wenn die Komponente mit dem Namen ComboBox keine Eigenschaft Items besitzt, dann ist der Name wohl etwas irreführend.

Welchen Typ hat denn diese ominöse Komponente?

Delphi-Quellcode:

procedure LoadItems(items: TStrings; ds: TDataSet; const fieldName: string);
var
  bm: TBookmark;
begin
  with ds do
  begin
    bm := GetBookmark;
    DisableControls;
    First;
    items.Clear;
    while not Eof do
    begin
      items.Add(FieldByName(fieldName).AsString);
      Next;
    end;
    GotoBookmark(bm);
    FreeBookmark(bm);
    EnableControls;
  end;
end;

Grüße vom marabu