Problem mit Combobox.Items.AddObject()

[spaxxn]

Ne reine Stilfrage:

Zitat von Borschti:

Delphi-Quellcode:

  VddQuery.First; 
  for i := 0 to VddQuery.RecordCount - 1 do 
    begin 
      Combobox.Items.AddObject(VddQuery.FieldByName(Spalten[0]).asString, TObject(VddQuery.Fieldbyname(Spalten[1]).asString)); 
      VddQuery.Next; 
    end;

Das ist ein bisschen eigenwillig

Sollte normalerweise so aussehen:

Zitat von Borschti:

Delphi-Quellcode:

    VddQuery.First;
    while not VddQuery.eof do
    begin
      Combobox.Items.AddObject(VddQuery.FieldByName(Spalten[0]).asString, TObject(VddQuery.Fieldbyname(Spalten[1]).asString));
      VddQuery.Next;
    end;