HSPTV!掲示板

オブジェクトの上をマウスカーソルを置くと、mousex/mouseyでの座標取得ができないため、
他の方法にて取得できないものかとginfo等で取得を試みましたが、どうしてもy座標がうまい具合に
取得できません。（数ドットずれる）
どなたかアドバイス宜しくお願いいたします。

;----------------------------------------------------------------------------
#module
　　　#defcfunc mouse_area int x1,int y1,int x2,int y2
　　　　　　c = 0
　　　　　　x = (ginfo_mx - ginfo_wx1) - ((ginfo_sizex - ginfo(12)) / 2)
　　　　　　y = (ginfo_my - ginfo_wy1) - (ginfo_sizey - ginfo(13)) ;<--数ドットずれる
　　　　　　title "x=" + x + ",y=" + y
　　　　　　if (x >= x1) & (x <= x2) & (y >= y1) & (y <= y2) : c = 1
　　　return c
#global

　　　input a,50,20
　　　boxf 100,100,200,200

　　　repeat
　　　　　　if mouse_area(100,100,200,200) : dialog "OK"
　　　　　　wait 1
　　　loop

一番簡単なのはScreenToClient APIを使うことでしょう

#uselib "user32.dll"
#func ScreenToClient "ScreenToClient" int, var

	pos 100, 100
	input a

*main
	wait 1
	
	mxy = ginfo_mx, ginfo_my
	ScreenToClient hwnd, mxy

	redraw 0
	color 255,255,255
	boxf
	color
	pos 0, 0
	mes "mouse:"+mousex+","+mousey
	mes "ginfo:"+mxy.0+","+mxy.1
	redraw 1

	goto *main

おお〜しっかりとy座標も取得できてます。
Shark++さん。ご丁寧にソースまで書いて頂いてありがとうございました。
旦■!(お茶とようかんどうぞ)

>Shark++さん。ご丁寧にソースまで書いて頂いてありがとうございました。

次にソースを掲載するときは、投稿フォーム上の1,2,3箇条の3番目を実行してください。
[pre]
スクリプトをコピペ
[/pre]
(ブラケットはアングルブラケットに読み替えてください)
このようにするとShark++さんのように表示されます。

>>kz3さん
気づきませんでした。
ご指摘ありがとうございます。