PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
21298 04/06/03 11:01:45 RE(6):ウインドウのサイズ変更 By amnesia
21297 04/06/03 11:01:12 RE(5):ウインドウのサイズ変更 By amnesia
21296 04/06/03 10:59:15 RE(4):ウインドウのサイズ変更 By amnesia
21295 04/06/03 10:58:27 RE(3):ウインドウのサイズ変更 By amnesia
21294 04/06/03 10:56:47 RE(2):ウインドウのサイズ変更 By amnesia
21293 04/06/03 10:56:02 RE(1):ウインドウのサイズ変更 By amnesia
21271 04/05/31 15:33:26 ウインドウのサイズ変更 By nj

カテゴリ:スクリプトの記述
日付:2004年06月03日 10:58 発信者:amnesia
題名:RE(3):ウインドウのサイズ変更

njさん、こんにちは。

>ウインドウのサイズを変更するとき、
>ボタン、DW、テキストなどの大きさも一緒に変更することはできるのでしょうか?

こんなのは・・・ 3/4

save_size イベント(関数)

long ll_count , ll_loop

multilineedit lmle_hoge
editmask lem_hoge
line lln_hoge
radiobutton lrb_hoge
checkbox lcbx_hoge
picturebutton lpb_hoge
commandbutton lcb_hoge
datawindow ldw_hoge
singlelineedit lsle_hoge
statictext lst_hoge
dropdownlistbox lddlb_hoge
userobject luo_hoge
groupbox lgbx_hoge
listbox llb_hoge
treeview ltv_hoge

ll_count = UpperBound(control[])
for ll_loop = 1 to ll_count
choose case typeof(control[ll_loop])
case multilineedit!
lmle_hoge = control[ll_loop]
il_x[ll_loop] = lmle_hoge.x
il_y[ll_loop] = lmle_hoge.y
il_w[ll_loop] = lmle_hoge.width
il_h[ll_loop] = lmle_hoge.height
il_f[ll_loop] = lmle_hoge.textsize
case editmask!
lem_hoge = control[ll_loop]
il_x[ll_loop] = lem_hoge.x
il_y[ll_loop] = lem_hoge.y
il_w[ll_loop] = lem_hoge.width
il_h[ll_loop] = lem_hoge.height
il_f[ll_loop] = lem_hoge.textsize
case line!
lln_hoge = control[ll_loop]
il_x[ll_loop] = lln_hoge.BeginX
il_y[ll_loop] = lln_hoge.BeginY
il_w[ll_loop] = lln_hoge.EndX
il_h[ll_loop] = lln_hoge.EndY
// il_f[ll_loop] = lln_hoge.textsize
il_f[ll_loop] = 0
case checkbox!
lcbx_hoge = control[ll_loop]
il_x[ll_loop] = lcbx_hoge.x
il_y[ll_loop] = lcbx_hoge.y
il_w[ll_loop] = lcbx_hoge.width
il_h[ll_loop] = lcbx_hoge.height
il_f[ll_loop] = lcbx_hoge.textsize


付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS (記載なし)
DBMS (記載なし)
Browser (記載なし)

Server SoftWare

OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)

PowerSpaceの運営は、パワーフューチャー株式会社が行っております。
Copyright © 2013 Power Future Co., Ltd.