Form DisplayObj_p { x = 0; y = 0; width = 800; height = 600; /* このサンプルはテキストファイルをドラッグ&ドロップでお試しください */ ListBox ListBox11 { x = 24; y = 32; width = 128; /* height = 100; */ # 無指定は100 active = true ; # falseで不活性 acceptDrop = DROP_FILE; bgColor = "CYAN" ; inactiveBgColor = "BLACK" ; border = BORDER_DASH ; clipLeft = 25 ; clipTop = 5 ; opacity = 0.5 ; tabindex = 2; Function OnDropped(e) { ^.EditBox12.value = e.Data.Read(); } } EditBox EditBox12 { x = 176; y = 48; width = 200; /* height = 80; */ # 無指定は100 Border = BORDER_SUNKEN; fgColor = "RED" ; inactiveFgColor = "WHITE" ; font = new Font("MS 明朝",16) ; /* 以下の項目は実際に試してみてください。 scroll = SCROLL_NONE ; scrollBarSize = 30 ; tabindex = 1 ; */ title = "内容表示" ; } Label label1 { x = 32; y = 8; width = 192; height = 16; title = "下の枠にテキストファイルをドロップ" ; } NumberEdit NumberEdit11[2] { x = 56; y = 160; width = 100; height = 25; layout = LAYOUT_VERTICAL ; margin = 10; # box内のマージン layoutMargin = 10 ; layoutSpacing = 10; NumberEdit11[0].Value = 40 ; NumberEdit11[1].Value = 80; } Button Button1 { x = 184; y = 168; width = 69; height = 28; Title = "ScrollBar"; Function OnTouch( e ) { ^.EditBox12.scrollBarSize = ^.NumberEdit11[0].Value ; } } Button Button2 { x = 184; y = 200; width = 69; height = 28; Title = "height "; Function OnTouch( e ) { ^.EditBox12.height = ^.NumberEdit11[1].Value ; } } }