东之源小型超市管理系统源码

【例子介绍】

超市管理

【相关图片】

【源码结构】

program Project;

uses
  Forms,
  UnitLogin in 'UnitLogin.pas' {Form1},
  UnitMain in 'UnitMain.pas' {Form2},
  UnitUserList in 'UnitUserList.pas' {FrameUserList: TFrame},
  UnitProdList in 'UnitProdList.pas' {FrameProdList: TFrame},
  UnitSell in 'UnitSell.pas' {FrameSell: TFrame},
  UnitReportProd in 'UnitReportProd.pas' {DbReportProd},
  UnitDbBuckup in 'UnitDbBuckup.pas' {FrameDbBuckup: TFrame},
  UnitReportSell in 'UnitReportSell.pas' {DbReportSell},
  UnitSellHistory in 'UnitSellHistory.pas' {FrameSellHistory: TFrame},
  UnitAbout in 'UnitAbout.pas' {FormAbout},
  UnitHelp in 'UnitHelp.pas' {FormHelp};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '超市管理系统';
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TDbReportSell, DbReportSell);
  Application.CreateForm(TDbReportProd, DbReportProd);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TFormAbout, FormAbout);
  Application.CreateForm(TFormHelp, FormHelp);
  Application.Run;
end.