pb:判断另一应用是否正在运行

判断另一应用是否正在运行 实现 首先声明下列local external函数 Function uint GetModuleHandle(string ModuleName) Library "kernel" Function uint GetModuleUsage(uint ModuleName) Library "kernel" Function uint FindExecutable(string FileName, REF string Directory, REF string Result) Library "shell"键入下面的窗口级函数: fw_check_app_status //返回: boolean //参数: // string as_filename // string as_directory integer li_size = 144, li_result string ls_executable = Space ( li_size ) integer li_module_usage uint li_module_handle li_result = FindExecutable ( as_filename, as_directory, ls_executable ) IF li_result ＜ 32 THEN Return FALSE //如可执行文件已载入,获取这个执行文件的句柄 li_module_handle = GetModuleHandle ( ls_executable ) IF li_mo