delphi - 単一のステートメントで ListBox から ArrayList にオブジェクトを割り当てる方法は?

Question

Delphi Prism では、1 つのステートメントで ListBox から ArrayList に objectcollection を割り当てる必要があります。これまでのところ、解決策は見つかりませんでした。

Delphiでは、これが私がやった方法です。

theUser.Groups.Assign(ListBox1.Items);

Groups は、Delphi では TList であり、Delphi Prism では ArrayList です。Delphi Prismで同じことをしようとすると、次のエラーが発生します。

「Groups.TGroupList」には、式「theUser.groups.Assign」に「Assign」の定義が含まれていません。

ArrayList に objectcollection を受け入れるメソッドがない場合は、ListBox アイテム内の各オブジェクトをループして、それを ArrayList に追加する必要があります。

どのようにしますか？

前もって感謝します。

score 5 · Accepted Answer

未テスト:

theUser.Groups.AddRange(ListBox1.Items)

ArrayList.AddRangeICollection実装するインターフェースを受け入れますListBox.ObjectCollection。

以下も参照してください。

score 2 · Accepted Answer

AddRange()の方法を使用する必要がありArrayListます。

Delphi コードに相当するものは次のとおりです。

theUser.Groups.Clear();
theUser.Groups.AddRange(ListBox1.Items);

score 0 · Accepted Answer

既存のリストに追加する必要はなく、リストに追加する必要がある場合は、LINQ を使用することもできます。

lbMyListBox.Items.Cast<String>().ToList();

Cast のように無効なアイテムでキャストエラーを呼び出すのではなく、特定のタイプのアイテムのみを選択する場合は、Cast() の呼び出しを OfType() に置き換えることができます。

3 に答える 3