打开Project1.cpp,插入下面一段话(夹在////////////////////////////////////////////////段中) WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) { try { Application->Initialize();
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// Application->Title = "网址管理专家"; CreateMutex(NULL,False,"网址管理专家"); if(GetLastError()==ERROR_ALREADY_EXISTS) { ShowMessage("网址管理专家 已经运行了,请查看屏幕左下角的小条子!"); return 0; } /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// Application->CreateForm(__classid(TForm1), &Form1); Application->CreateForm(__classid(TForm2), &Form2); Application->CreateForm(__classid(TForm3), &Form3); Application->CreateForm(__classid(TForm4), &Form4); Application->Run(); } catch (Exception &exception) { Application->ShowException(&exception); } catch (...) { try { throw Exception(""); } catch (Exception &exception) { Application->ShowException(&exception); } } return 0; } 其功能: 1、设程序标题名 2、检测同名程序 3、存在错误就退出 正文 
|