だと、シングルクリックが優先されてしまいダブルクリックが取得できません。
どのようにすればダブルクリックが取れますでしょうか。
#include "user32.as" #define WM_LBUTTONDOWN $0201 #define WM_LBUTTONDBLCLK $0203 #define WM_RBUTTONDOWN $0204 #define WM_RBUTTONDBLCLK $0206 #define WM_MBUTTONDOWN $0207 #define WM_MBUTTONDBLCLK $0209 screen 0 oncmd gosub *LBUTTON , WM_LBUTTONDOWN oncmd gosub *RBUTTON , WM_RBUTTONDOWN oncmd gosub *LDblClk , WM_LBUTTONDBLCLK GetClassLong hwnd, -26 SetClassLong hwnd, -26, stat | $0008 stop *LBUTTON dialog "LBUTTON" return *RBUTTON dialog "RBUTTON" return *LDblClk dialog "LDblClk" return