易语言窗口跟随焦点源码

窗口跟随焦点系统结构:GetGUIThreadInfo,ClientToScreen,SetWindowPos, ======窗口程序集1 || ||------_时钟1_周期事件 || || ======调用的Dll || ||---[dll]------GetGUIThreadInfo || ||---[dll]------ClientToScreen || ||---[dll]------SetWindowPos 调用的DLL命令: .DLL命令GetGUIThreadInfo,逻辑型,,"GetGUIThreadInfo" .参数idThread,整数型 .参数LPGUITHREADINFO,tagGUITHREADINFO .DLL命令ClientToScreen,逻辑型,,"ClientToScreen" .参数hwnd,整数型 .参数LPPOINT,POINT .DLL命令SetWindowPos,整数型,"user32","SetWindowPos" .参数hwnd,整数型 .参数hWndInsertAfter,整数型 .参数x,整数型 .参数y,整数型 .参数cx,整数型 .参数cy,整数型 .参数wFlags,整数型