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 (記載なし)
Copyright © 2013 Power Future Co., Ltd.




