air.~dpr

使用Delphi 6.0开发用于控制空调的程序

program AIR;

uses
  Forms,
  Main in 'Main.pas' {frmain},
  ControlClass in 'ControlClass.pas',
  Installed_Simu in 'Installed_Simu.pas' {Setting},
  ReceMsg in 'ReceMsg.pas',
  AC in 'AC.pas',
  SU in 'SU.pas',
  InterfaceIn in 'InterfaceIn.pas' {InterfaceInfo},
  IDF in 'IDF.pas',
  IDInfo in 'IDInfo.pas',
  Line in 'Line.pas',
  RSU in 'RSU.pas',
  LineInfo in 'LineInfo.pas',
  IDPaperAbalInfo in 'IDPaperAbalInfo.pas' {frmISPAbal},
  IDSet in 'IDSet.pas' {frmIDSet},
  IDShow in 'IDShow.pas' {frmIDShow},
  ACC in 'ACC.pas' {frmACC},
  ACCShow in 'ACCShow.pas' {frmACCShow},
  comm in 'comm.pas' {frmComm},
  Pass_Pope_Modify in 'Pass_Pope_Modify.pas' {F_PP_Modi},
  URegister in 'URegister.pas' {F_Register},
  Login in 'Login.pas' {F_Login},
  Data in 'Data.pas' {frmData},
  TempChart in 'TempChart.pas' {frmTemChart},
  ADDAC in 'ADDAC.pas' {frmADDAC},
  qry in 'qry.pas' {frmQry},
  ACRM in 'ACRM.pas' {FrmACRM},
  SendThread in 'SendThread.pas',
  RecvThread in 'RecvThread.pas',
  FanWind in 'FanWind.pas' {frmFanWind},
  SetTemp in 'SetTemp.pas' {frmSetTemp},
  HotAndCold in 'HotAndCold.pas' {frmHotAndCold};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TF_Login, F_Login);
  Application.CreateForm(Tfrmain, frmain);
  Application.CreateForm(TSetting, Setting);
  Application.CreateForm(TfrmIDSet, frmIDSet);
  Application.CreateForm(TfrmIDShow, frmIDShow);
  Application.CreateForm(TfrmACC, frmACC);
  Application.CreateForm(TfrmACCShow, frmACCShow);
  Application.CreateForm(TfrmComm, frmComm);
  Application.CreateForm(TF_PP_Modi, F_PP_Modi);
  Application.CreateForm(TF_Register, F_Register);
  Application.CreateForm(TfrmData, frmData);
  Application.CreateForm(TfrmTemChart, frmTemChart);
  Application.CreateForm(TfrmADDAC, frmADDAC);
  Application.CreateForm(TfrmQry, frmQry);
  Application.CreateForm(TFrmACRM, FrmACRM);
  Application.CreateForm(TfrmFanWind, frmFanWind);
  Application.CreateForm(TfrmSetTemp, frmSetTemp);
  Application.CreateForm(TfrmHotAndCold, frmHotAndCold);
  Application.Run;

end.