qiby.dpr

这是一个用条码录入的数据的进销存(只对成品）---做童装的

program Qiby;

uses
  Forms,
  U_main in 'U_main.pas' {F_main},
  U_Function in 'U_Function.pas',
  U_DM in 'U_DM.pas' {F_Dm: TDataModule},
  U_base in 'U_base.pas' {F_base},
  U_Dbsetting in 'U_Dbsetting.pas' {F_Dbsetting},
  U_Login in 'U_Login.pas' {F_Login},
  U_Set_Base in 'U_Set_Base.pas' {F_set_base},
  U_Base_Group in 'U_Base_Group.pas' {F_Base_Group},
  U_Cncode in 'U_Cncode.pas',
  U_Bill_Base in 'U_Bill_Base.pas' {F_Bill_Base},
  U_IBand in 'U_IBand.pas' {F_IBand},
  U_IItem in 'U_IItem.pas' {F_IItem},
  U_WareHouse in 'U_WareHouse.pas' {F_WareHouse},
  U_Product in 'U_Product.pas' {F_Product},
  U_Customer in 'U_Customer.pas' {F_Customer},
  U_UserManage in 'U_UserManage.pas' {F_UserManage},
  U_EditPassword in 'U_EditPassword.pas' {F_EditPassword},
  U_Report_Base in 'U_Report_Base.pas' {F_Report_Base},
  U_OperateLog in 'U_OperateLog.pas' {F_OperateLog},
  U_OperatLog_query in 'U_OperatLog_query.pas' {F_operateLog_Query},
  U_Order in 'U_Order.pas' {F_Order},
  U_Report_Frame in 'U_Report_Frame.pas' {F_Order_Report: TQuickRep},
  U_InWareHouse in 'U_InWareHouse.pas' {F_InWarehouse},
  U_SetColumn in 'U_SetColumn.pas' {F_SetColumn},
  U_JDSetting in 'U_JDSetting.pas' {F_JDsetting},
  U_NewOrder in 'U_NewOrder.pas' {F_base1};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TF_Dm, F_Dm);
  Application.CreateForm(TF_main, F_main);
  Application.CreateForm(TF_Login, F_Login);
  //
//   F_login.ShowModal;
//  if F_login.ModalResult = 1 then
//  begin
 Application.Run;
//  end
//  else
//  begin
//    F_login.Free;
//    Application.Terminate;
//  end;
end.