自分のウインドウ以外では反応しません。
他のウインドウでも取得する方法はありますか?
#define WM_NCHITTEST 0x0084 #define HTCAPTION 2 //キャプションバー #uselib "user32.dll" #cfunc DefWindowProc "DefWindowProcA" int,int,int,int #func GetForegroundWindow "GetForegroundWindow" oncmd gosub *NCHITTEST,WM_NCHITTEST stop *NCHITTEST cls GetForegroundWindow ret=DefWindowProc(stat,WM_NCHITTEST,wparam,lparam) if (ret==HTCAPTION):mes "*****" return