play.dpr

药店GSP源码

program Play;

uses
  Forms,
  main in 'main.pas' {form5},
  active in 'active.pas' {Form2},
  chaxun in 'chaxun.pas' {Form3},
  ypqd in 'ypqd.pas' {Form4},
  login in 'login.pas' {Form1},
  jhdj in 'jhdj.pas' {Form6},
  gys in 'gys.pas' {Form7},
  ggmm in 'ggmm.pas' {Form8},
  ADUSER in 'ADUSER.pas' {Form9},
  sccj in 'sccj.pas' {Form10},
  gys1 in 'gys1.pas' {Form11},
  sccj1 in 'sccj1.pas' {Form12},
  xs_ch in 'xs_ch.pas' {Form13},
  LOTNO in 'LOTNO.pas' {Form14},
  jx1 in 'jx1.pas' {Form15},
  ku_cun in 'ku_cun.pas' {Form16},
  xsj_ch in 'xsj_ch.pas' {Form17},
  jh_ch in 'jh_ch.pas' {Form18};

{$R *.res}

begin
  Form2:=TForm2.Create(Application);
  Form2.Show;
  Form2.Refresh;
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Form2.Free;
  Application.CreateForm(Tform5, form5);
  Application.CreateForm(TForm3, Form3);
  Application.CreateForm(TForm4, Form4);
  Application.CreateForm(TForm6, Form6);
  Application.CreateForm(TForm7, Form7);
  Application.CreateForm(TForm8, Form8);
  Application.CreateForm(TForm9, Form9);
  Application.CreateForm(TForm10, Form10);
  Application.CreateForm(TForm11, Form11);
  Application.CreateForm(TForm12, Form12);
  Application.CreateForm(TForm13, Form13);
  Application.CreateForm(TForm14, Form14);
  Application.CreateForm(TForm15, Form15);
  Application.CreateForm(TForm16, Form16);
  Application.CreateForm(TForm17, Form17);
  Application.CreateForm(TForm18, Form18);
  Application.Run;
end.