mybegin.dpr

这是所谓的折叠函数的代码,有兴趣的可拿去研究研究,经典

program MyBegin;

uses
  ExceptionLog,
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  CsFunA in 'f:\纵横资料软件\PubFun\CsFunA.pas',
  FReplace in 'f:\纵横资料软件\PubFun\FReplace.pas',
  dlgConfirmReplace in 'dlgConfirmReplace.pas' {ConfirmReplaceDialog},
  dlgReplaceText in 'dlgReplaceText.pas',
  dlgSearchText in 'dlgSearchText.pas' {TextSearchDialog};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TConfirmReplaceDialog, ConfirmReplaceDialog);
  Application.Run;
end.