DropdownList へのListValueItem の設定方法は？

[umemura]

DropdownList に対して、ListValueItem を設定する際に、
下記のコードで設定すると、実行は出来るのですが、
リストを選んだ際に、エラーが発生します。

Code:

def dl = {DropdownList}
def dm =
    {DefaultListModel
        {ListValueItem "a", label = "test-a"},
        {ListValueItem "b", label = "test-b"},
        {ListValueItem "c", label = "test-c"},
        {ListValueItem "d", label = "test-d"}
    }
set dl.data-model = dm

■エラー内容
アプレット [9-34] - DropdownList 内の ListValueItem のラベル '[ListValueItem @0x074141D4]' をクローンできません。の為、例外Errorで停止


しかし、下記のような記述であれば、問題ありませんでした。

Code:

{for itm in dm do
    {dl.append itm}
}

また、DefaultListModel の値が、String であれば、
DoropdownList.data-model に設定しても、問題ありませんでした。
（ただし、ラベル＝値 になってしまいますが）

Code:

def dm =
    {DefaultListModel
        "test-a",
        "test-b",
        "test-c",
        "test-d"
    }
set dl.data-model = dm

DoropdownList に ListValueItem を設定する方法としては、
append を使うのが正しい、ということなのでしょうか。
for 文を使わなければいけない、という点に違和感を感じています。

もし、よりシンプルで正しい方法があれば、教えてください。