idms.dpr

一个详细功能齐全的档案管理信息系统 跟大家分享一下。这是老师给的光盘里带的

program IDMS;

uses
  Forms,
  Main in 'Main.pas' {fMain},
  pwd in 'pwd.pas' {fpwd},
  cover in 'cover.pas' {fcover},
  ChangePwd in 'ChangePwd.pas' {fChangePwd},
  ChangeZH in 'ChangeZH.pas' {fChangeZH},
  dm in 'dm.pas' {fdm: TDataModule},
  basedata in 'BaseData.pas' {fBaseData},
  ItemData_GZ in 'ItemData_GZ.pas' {fItemdata_GZ},
  Carinfo in 'Carinfo.pas' {fCarinfo},
  Scanform in 'Scanform.pas' {fScanform},
  SelectForm in 'SelectForm.pas' {funit},
  GBset in 'GBset.pas' {fGBset},
  quyupz in 'quyupz.pas' {fquyu},
  CarKind in 'CarKind.pas' {fCarkind},
  Factype in 'Factype.pas' {fFactype},
  Adduser in 'Adduser.pas' {fAdduser},
  SqlStr in 'SqlStr.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.Title:='档案管理系统';
  Application.CreateForm(Tfdm, fdm);
  Application.CreateForm(TfMain, fMain);
  Application.CreateForm(TfAdduser, fAdduser);
  Application.Run;
end.