以下是引用TonyDeng在2011-7-7 21:32:39的发言：

寫在隨便一個數據表（DBF）文件中，表頭中有未使用的空間供填寫數據，在那裏寫一些標記，每次啓動時程序自己檢查一下那個標誌在不在，在就是已經啓動過，結束自己。程序正常結束時，把那個標誌清掉。

以下是引用wjh8095在2011-7-2 00:23:08的发言：

DECLARE   integer   FindWindow   in   Win32Api   String,   String
wclass=0
winname= "我的程序 "
apphand   =   FindWindow(wclass   ,winname)
*   如果调用成功,   停止处理.
IF   apphand <> 0
WAIT   WINDOW   "不能运行窗口   '我的程序 '   的另一个实例! "
QUIT
ENDIF
MODIFY   WINDOW   screen   TITLE   "我的程序 "   
WAIT   WINDOW   "窗口   '我的程序 '   的第一个实例正在运行. "