HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2014
0201
まーるチェックボタンやラジオボタンを大きくするには?2解決


まーる

リンク

2014/2/1(Sat) 21:03:32|NO.59601

chkboxなんですが
objsizeでchkbox外枠のフォーカス幅や高さは大きくなりますが、
チェックボタン自体が大きくなりません。
fontを使うとチェックボックスのテキストは大きくなりますが、
やはりチェックボタンやチェックの印は大きくならないです。
ラジオボタンなども同様に大きくすることができません。

チェックボックスのチェックボタンやラジオボタンの
大きさを変えることはできるんでしょうか?



check1 = 0; pos 0, 0; chkbox "チェックボックス1", check1; //□の部分が大きくならない check2 = 0; pos 20, 40; objsize 200, 40; chkbox "チェックボックス2", check2; check3 = 0; pos 40, 100; objsize 400, 60; objmode 2; font "MS 明朝", 40, font_normal; chkbox "チェックボックス3", check3; stop;



この記事に返信する


fortunehill

リンク

2014/2/2(Sun) 03:56:24|NO.59605

/*ご参考(こんな物しか思いつかん)*/

#uselib "user32" #func global DrawFrameControl "DrawFrameControl" sptr,sptr,sptr,sptr #define global ctype _Crect(%1=0,%2=0,%3=0,%4=0,%5=mousex,%6=mousey) (((%5>=%1)&(%5<=%3))|((%6>=%2)&(%6<=%4))*2) font msmincho,64 c1 = 0,64,64,64*2 :DrawFrameControl hdc,varptr(c1),4,0 :pos 64,64 :mes "チェックボックス1" c2 = 0,64*2,64,64*3 :DrawFrameControl hdc,varptr(c2),4,0 :pos 64,64*2 :mes "チェックボックス2" redraw oncmd gosub *label,$201 ;WM_LBUTTONDOWN stop *label if (_Crect(c1,c1(1),c1(2),c1(3)) == 3) {ii = ii^1 :DrawFrameControl hdc,varptr(c1),4,ii*$400 :redraw} if (_Crect(c2,c2(1),c2(2),c2(3)) == 3) {ii(1) = ii(1)^1 :DrawFrameControl hdc,varptr(c2),4,ii(1)*$400 :redraw} return



まーる

リンク

2014/2/3(Mon) 21:01:56|NO.59639

DrawFrameControl関数でボタンのような立体的な絵が描けるんですね。
クリックの領域判定の所が私には難しかったですが、参考にします。
ありがとうございます!



ONION software Copyright 1997-2021(c) All rights reserved.