Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by jim_raynor,
28. Dez 2005
Dein Problem ist doch, dass durch ListBox1.Items:=(Source as TFileListBox).Items; der Komplette Inhalt der ListBox übertragen wird. Um nur die ausgewählten Einträge zu übernehmen musst du also ein Schleife über die Einträge machen.
for Dummy:=0 to (Source as TFileListBox).Items.Count-1 do
begin
if (Source as TFileListBox).Items.Selected then
ListBox1.Items.Add( Source as...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by jim_raynor,
28. Dez 2005
Du musst natürlich dein i auch verwenden. Zum Beispiel so:
ListBox1.Items.Add((Source as TFileListBox).Items; Und bei mehreren musst du halt eine Schleife über die Items in Source machen und über die Eigenschaft Selected abfragen, ob der Eintrag ausgewählt ist. Wenn ja. Der anderen Listbox hinzufügen.