Problem mit Combobox.Items.AddObject()

[Borschti]

Achso, ja, hatte das in die Schleife in der procedure reingepackt, nur vergessen zu posten weils leider nicht funktioniert hat

Delphi-Quellcode:

 While not VddQuery.EoF do
    begin
      PoolData := TPoolData.Create;

      PoolData.var1 := VddQuery.FieldByName(Spalten[0]).asString;
      PoolData.var2 := VddQuery.Fieldbyname(Spalten[1]).asString;

      Combobox.Items.AddObject(VddQuery.FieldByName(Spalten[0]).asString, PoolData);
      VddQuery.Next;
    end;