pb:激活另一个应用实现

激活另一个应用实现 首先声明下列local external函数 Subroutine BringWindowToTop(int hWnd) Library "User" Function uint GetNextWindow(uint hWnd, int Flag) Library "user" Function uint GetWindowText(uint hWnd, REF string Title, uint Size )Library "user"Function uint ShowWindow(uint hWnd, int CmdShow) Library "user" Function integer IsIconic(uint hWnd) Library "user" Function integer OPenIcon(uint hWnd) Library "user" Function integer FindWindow(string ClassName, string WindowName) Library "user"Function integer FindWindow(long ClassName, string WindowName) Library "user"Function integer FindWindow(string ClassName, long WindowName) Library "user"键入下面的窗口级函数: fw_make_app_active //返回:boolean //参数: //string as_title boolean lb_cont = TRUE integer li_result, li_size string ls_title uint li_handle li_handle = Handle ( this ) li_size = Len ( at_title ) +