autohelp.dpr

来自「autoupdate 1.02 source code」· DPR 代码 · 共 23 行

program autohelp;

uses
  Forms,
  dialogs,
  helper in 'helper.pas' {HelperForm};

{$R *.RES}

begin
   if ParamCount < 4 then
   begin
      //ShowMessage(IntToStr(ParamCount));
      MessageDlg('This is the helper application for the ITIG Autoupgade Agent.  You do not need to run this program directly', mtInformation, [mbOK], 0);
   end
   else
   begin
     Application.Initialize;
     Application.CreateForm(THelperForm, HelperForm);
  Application.Run;
   end;
end.