comrun.dpr

来自「DELPHI5加SQL SERVER2000完成的进销存系统,具体哪些内容记不清」· DPR 代码 · 共 33 行

program ComRun;

uses
  Forms,
  PS_main in 'PS_main.pas' {F_main},
  PS_comdepartment in 'PS_comdepartment.pas' {F_comdepartment},
  PS_comwareahouse in 'PS_comwareahouse.pas' {F_comwarehouse},
  PS_comwareamount in 'PS_comwareamount.pas' {F_comwareamount},
  PS_db in 'PS_db.pas' {comdatabase: TDataModule},
  PS_comcustomer in 'PS_comcustomer.pas' {F_comcustomer},
  PS_comproduct in 'PS_comproduct.pas' {F_comproduct},
  PS_comperson in 'PS_comperson.pas' {F_comperson},
  PS_stkbill in 'PS_stkbill.pas' {F_stkbill},
  PS_ordbill in 'PS_ordbill.pas' {F_ordbill},
  PS_stkPlus in 'PS_stkPlus.pas' {F_stkPlus},
  PS_P_ordbill in 'PS_P_ordbill.pas' {F_R_ordbill},
  PS_comprocess in 'PS_comprocess.pas',
  PS_welcome in 'PS_welcome.pas' {F_welcome};

{$R *.RES}

begin
  f_welcome:=tf_welcome.Create(f_welcome);
  f_welcome.show;
  f_welcome.Update;
  Application.Initialize;
  Application.HelpFile := '..\help\HELP.HLP';
  Application.CreateForm(Tcomdatabase, comdatabase);
  f_welcome.Close;
  f_welcome.free;
  Application.Run;
end.