delphi中，让程序只运行一次的方法(2)

delphi中，让程序只运行一次的方法(2)uses　　 Windows, 　　Forms,  　　SysUtils,  　　Messages, 　　 Dialogs, 　　 Unit1