Hier ein konstrukt wie man evtl an solch eine sache rangehen könnte.
Nur im Notepad geschrieben, also ungetestet!
Delphi-Quellcode:
var
Form1: TForm1;
cbList: TList;
implementation
// wenn als click-event, dann sollte hier nur die cbList initialisiert werden und im click dann einfach adden
procedure TForm1.FormCreate(Sender: TObject);
var i: integer
cb: TComboBox;
begin
cbList := TList.Create;
for i := 0 to 9 do
begin
cb := TComboBox.Create(self);
cb.Parent := self;
cb.Top := (i * (cb.Height + 3));
// weitere optionen setzen
cbList.Add(cb);
end;
// als beispiel alle boxen mit text versehen:
for i := 0 to cbList.Count-1 do
TComboBox(cbList[i]).Text := Format('ComboBox %d', [i]);
end;
Ich hoffe es hilft, im close event halt die cbList durchiterieren und .Free ranpappen.