精华区 [关闭][返回]

当前位置:网易精华区>>讨论区精华>>编程开发>>● VFP>>〖外部引用〗>>如何阻止VFP程序二次运行

主题:如何阻止VFP程序二次运行
发信人: foxzz()
整理人: hunter__fox(2002-03-16 21:48:54), 站内信件
请参考: 
declare integer FindWindow IN USER32.DLL AS Find_Window STRING,STRING 
LOCAL m_appTitle 
m_appTitle="myapp1" 
if find_window(0,m_apptitle)!=0 
   =messagebox("本程序已运行",48) 
   return .f. 
endif 
_screen.caption="myapp1" 

[关闭][返回]