아래 소스를 참고하세요!

program Project1;

uses
  Winapi.Windows,
  System.SysUtils,
  Vcl.Forms,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
  Application.Initialize;
  if FileExists(ExtractFilePath(ParamStr(0)) + 'pad.reg') then
  begin
    Application.CreateForm(TForm1, Form1);
    Application.Run;
  end
  else
  begin
    Application.MessageBox('File not Found!', 'Error!', MB_OK + MB_ICONERROR);
    Application.Terminate;
  end;
end.

백진수 님이 쓰신 글 :
: 델파이 프로그램을 켰을시 같은폴더에 pad.reg 라는 파일 유무에 따라 없을 시 어플리케이션 터미네이트; 하려는데 소스를 어떻게 짜야되죠?