test.dpr

这是我的一个Delphi测试的一个链接access的一点代码

program test;

uses
  Forms,
  main in 'main.pas' {Frm_main},
  DataModule in 'DataModule.pas' {DataModule1: TDataModule},
  form_db in 'form_db.pas' {Frm_db},
  Frm_client in 'Frm_client.pas' {Form1},
  frm_prope in 'frm_prope.pas' {Form2},
  frmtloy in 'frmtloy.pas' {frm_tloy},
  frm_touchinf in 'frm_touchinf.pas' {frm_touchinfo},
  frmclproperty in 'frmclproperty.pas' {frm_clproperty},
  frmtouchinfo in 'frmtouchinfo.pas' {frm_cltouchinfo},
  frmtouch in 'frmtouch.pas' {frm_cltouch},
  frmplan in 'frmplan.pas' {frm_plan},
  Unit3 in 'Unit3.pas' {Form3};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TFrm_main, Frm_main);
  Application.CreateForm(TDataModule1, DataModule1);
  Application.CreateForm(TFrm_db, Frm_db);
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(Tfrm_tloy, frm_tloy);
  Application.CreateForm(Tfrm_touchinfo, frm_touchinfo);
  Application.CreateForm(Tfrm_clproperty, frm_clproperty);
  Application.CreateForm(Tfrm_cltouchinfo, frm_cltouchinfo);
  Application.CreateForm(Tfrm_cltouch, frm_cltouch);
  Application.CreateForm(Tfrm_plan, frm_plan);
  Application.CreateForm(TForm3, Form3);
  Application.Run;
end.