W weiiguo Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-19 #1 要求：1、程序先关闭自己，然后再重新启动 2、不能有多个程序同时运行，即始终只有一个程序在运行
网 网中戏 Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-19 #2 关闭事件 procedure TMAINForm.FormClose(Sender: TObject; var Action: TCloseAction); var opexe:string ; begin opexe:= application.ExeName ; winexec(pchar( opexe),sw_show); end;
关闭事件 procedure TMAINForm.FormClose(Sender: TObject; var Action: TCloseAction); var opexe:string ; begin opexe:= application.ExeName ; winexec(pchar( opexe),sw_show); end;
