Wie wärs mit:
Delphi-Quellcode:
Edit1.Text := '';
for I := 0 to ComboBox1.Items.Count -1 do begin
Edit1.Text := Edit1.Text + ' ' + ComboBox1.Items[I].Text;
end;
oder so ähnlich. Code ist ungetestet sollte aber funktionieren (da nur hier im Editor geschrieben)