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


HSPTV!掲示板


未解決 解決 停止 削除要請

2009
1016
whoさんマウス位置3解決


whoさん

リンク

2009/10/16(Fri) 14:09:29|NO.28307

ボタンの上やmesbox の上ではマウス位置をどうやって取得すればいいんですか?
教えてください!



この記事に返信する


a

リンク

2009/10/16(Fri) 14:44:52|NO.28308

API関数を使って、

#include "user32.as" sdim a mesbox a, 640, 480 dim pt, 2 repeat GetCursorPos varptr(pt) ScreenToClient hWnd, varptr(pt) title "" + pt.0 + "," + pt.1 wait 10 loop



SYAM

リンク

2009/10/16(Fri) 16:32:23|NO.28309

API関数を使わずに、


randomize objsize 64,32 repeat 16 pos rnd(ginfo_winx-64),rnd(ginfo_winy-64)+32 button "じゃまもの",*DUMMY loop sx = (ginfo_sizex-ginfo_winx) / 2 sy = ginfo_sizey-ginfo_winy-sx *DUMMY repeat mx = ginfo_mx - ginfo_wx1 - sx my = ginfo_my - ginfo_wy1 - sy redraw 0 color 255,255,255 : boxf pos 0,0 :color 0,0,0 mes "取れる →"+mx+","+my+" " mes "取れない→"+mousex+","+mousey redraw 1 wait 1 loop

…ただし、これだと sx , sy の計算の後にウインドウのデザインを変えられるとズレます。
標準の命令しか使っていないので、読めば何をしてるんだか解るでしょう。



whoさん

リンク

2009/10/17(Sat) 16:59:58|NO.28339

ありがとうございます。
見事に解決しました。^^



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