Thread Rating:
  • 265 Vote(s) - 2.63 Average
  • 1
  • 2
  • 3
  • 4
  • 5
HBoxに定義した要素のオブジェクトを判別する
07-26-2012, 06:54 PM,
#1
HBoxに定義した要素のオブジェクトを判別する
次のコードのようにHBoxにオブジェクトを追加し、そのオブジェクトの要素を調べ
TextFieldの場合はそこに値をセットさせたいとき、どのように判定すればよいのでしょうか?

Code:
{value
    let hb:HBox = {HBox}
    {hb.add {CommandButton}}
    {hb.add {TextField}}
    {hb.add {ComboBox}}
    {for i=0 below hb.child-array.size do
        || TextFieldかどうかの判定
        {if ~ then
            || TextFieldにvalueをセット
        }
    }
    hb
}
Reply
07-27-2012, 09:50 AM,
#2
RE: HBoxに定義した要素のオブジェクトを判別する
これではどうでしょう
Code:
{value
    let hb:HBox = {HBox}
    {hb.add {CommandButton}}
    {hb.add {TextField}}
    {hb.add {ComboBox}}
    {for g in hb.graphical-children do
        {type-switch g
        case g:TextField do
            set g.value = "text-field"
        }
    }
    hb
}
Reply
07-27-2012, 09:59 AM,
#3
RE: HBoxに定義した要素のオブジェクトを判別する
いや、child-arrayをお使いだからこうでしょうか
Code:
    {for i=0 below hb.child-array.size do
        {type-switch hb.child-array[i]
        case tf:TextField do
            set tf.value = "text-field"
        }
    }
Reply
07-27-2012, 02:50 PM,
#4
RE: HBoxに定義した要素のオブジェクトを判別する
ありがとうございました。

child-arrayで判断すると値が入ってこないようなので次のように変更したらうまくいきました。

Code:
{for i=0 below hb.child-array.size do
    {type-switch hb.child-array[i].graphic
    case tf:TextField do
        set tf.value = "text-field"
    }
}


Reply

Forum Jump:


Users browsing this thread:
1 Guest(s)

MyBB SQL Error

MyBB has experienced an internal SQL error and cannot continue.

SQL Error:
1017 - Can't find file: 'mybb_threadviews' (errno: 2)
Query:
INSERT INTO mybb_threadviews (tid) VALUES('577')