stringfind.dpr

来自「连接本地access数据文件」· DPR 代码 · 共 20 行

program StringFind;

uses
  Forms,
  SysUtils,
  Unit_Main in 'Unit_Main.pas' {frm_Main},
  Unit_About in 'Unit_About.pas' {frm_About},
  Unit_Data_Module in 'Unit_Data_Module.pas' {Examine_Data: TDataModule};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TExamine_Data, Examine_Data);
  Application.CreateForm(Tfrm_Main, frm_Main);
  Application.CreateForm(Tfrm_About, frm_About);
  myAppPath := ExtractFilePath(Application.ExeName);
  Application.Run;
end.