p_main.dpr

《机动车驾驶员模拟考试系统2008》软件全面、准确地包含了公安部2007年4月1日新发布的全国统一题库

program P_Main;

uses
  Forms,
  Windows,
  U_Main in 'U_Main.pas' {Frm_Main},
  U_Login in 'U_Login.pas' {Frm_Login},
  U_DM in 'U_DM.pas' {DM: TDataModule};

{$R *.res}
begin
CreateMutex(Nil,False,'驾驶员模拟考试系统');
  if GetLastError = ERROR_ALREADY_EXISTS then
     begin
       MessageBox(Application.Handle,'已经有一套系统在运行!','互斥窗体',
       MB_OK+MB_IconInformation);
       SendMessage(HWND_BROADCAST,
       RegisterWindowMessage('驾驶员模拟考试系统'),0,0);
       Halt(0);
     end;

  Application.Initialize;
  Application.Title := '驾驶员模拟考试系统';
  Application.CreateForm(TFrm_Main, Frm_Main);
  Application.ShowMainForm:=False;
  Application.CreateForm(TDM, DM);
  Application.CreateForm(TFrm_Login, Frm_Login);
  Application.Run;
end.