アイデアは非常に単純です。2 つのコンボボックスがあります。2 番目の値は、最初の値から選択した値に応じて更新する必要があります。
# combobox 1:
$shape = TkVariable.new
$combobox_1 = Tk::Tile::Combobox.new(parent) { textvariable $shape; values ['IPE', 'HEA']}
# combobox 2:
$size = TkVariable.new
$combobox_2 = Tk::Tile::Combobox.new(parent) { textvariable $size; values $size_list}
# action
$combobox_1.bind("<ComboboxSelected>") {
case $shape
when 'IPE' then $size_list = [80, 100, ...]
when 'HEA' then $size_list = [90, 130, ...]
end
}
しかし、何も起こりません。コンボボックス 2 は、その値が変更されたことを認識していないようです。どうすればこの問題を解決できますか?