Delphi实现程序只运行一次并激活已打开的程序
unit wdRunOnce;{******************************************* * brief: 让程序只运行一次 * autor: linzhenqun * date: 2005-12-28 * email: linzhengqun@163.com * blog: http://blog.csdn.net/linzhengqun******