installed_simu.dfm

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

object Setting: TSetting
  Left = 219
  Top = 155
  Width = 618
  Height = 370
  Caption = #35774#32622
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnPaint = FormPaint
  PixelsPerInch = 96
  TextHeight = 13
  object lbl1: TLabel
    Left = 24
    Top = 72
    Width = 154
    Height = 13
    Caption = #31354#35843#24320#26426#28201#24230#65306'         '
  end
  object lbl5: TLabel
    Left = 24
    Top = 108
    Width = 154
    Height = 13
    Caption = #22238#39118#28201#24230#19978#38480#65306'         '
  end
  object lbl7: TLabel
    Left = 24
    Top = 144
    Width = 154
    Height = 13
    Caption = #22238#39118#28287#24230#19978#38480#65306'         '
  end
  object lbl2: TLabel
    Left = 320
    Top = 72
    Width = 154
    Height = 13
    Caption = #31354#35843#20851#26426#28201#24230#65306'         '
  end
  object lbl3: TLabel
    Left = 320
    Top = 144
    Width = 154
    Height = 13
    Caption = #22238#39118#28287#24230#19979#38480#65306'         '
  end
  object lbl4: TLabel
    Left = 320
    Top = 108
    Width = 154
    Height = 13
    Caption = #22238#39118#28201#24230#19979#38480#65306'         '
  end
  object lbl6: TLabel
    Left = 320
    Top = 32
    Width = 86
    Height = 13
    Caption = #31354#35843#22320#22336#65306'   '
  end
  object lbl8: TLabel
    Left = 264
    Top = 72
    Width = 41
    Height = 13
    Caption = ' '#8451'   '
  end
  object lbl9: TLabel
    Left = 264
    Top = 108
    Width = 41
    Height = 13
    Caption = ' '#8451'   '
  end
  object lbl10: TLabel
    Left = 264
    Top = 144
    Width = 41
    Height = 13
    Caption = ' '#8451'   '
  end
  object lbl11: TLabel
    Left = 568
    Top = 72
    Width = 41
    Height = 13
    Caption = ' '#8451'   '
  end
  object lbl12: TLabel
    Left = 568
    Top = 108
    Width = 41
    Height = 13
    Caption = ' '#8451'   '
  end
  object lbl13: TLabel
    Left = 568
    Top = 144
    Width = 41
    Height = 13
    Caption = ' '#8451'   '
  end
  object lbl14: TLabel
    Left = 24
    Top = 32
    Width = 78
    Height = 13
    Caption = #25509#21475#26495#22320#22336#65306
  end
  object edtOpenTemp: TEdit
    Left = 144
    Top = 67
    Width = 113
    Height = 21
    TabOrder = 0
    Text = '0'
  end
  object edtReturnTempCeiling: TEdit
    Left = 144
    Top = 101
    Width = 113
    Height = 21
    TabOrder = 1
    Text = '0'
  end
  object edtCloseTemp: TEdit
    Left = 448
    Top = 72
    Width = 113
    Height = 21
    TabOrder = 2
    Text = '0'
  end
  object edtReturnTempLimit: TEdit
    Left = 448
    Top = 104
    Width = 113
    Height = 21
    TabOrder = 3
    Text = '0'
  end
  object edtReturnHumidityCelling: TEdit
    Left = 144
    Top = 136
    Width = 113
    Height = 21
    TabOrder = 4
    Text = '0'
  end
  object edtReturnHumidityLimit: TEdit
    Left = 448
    Top = 136
    Width = 113
    Height = 21
    TabOrder = 5
    Text = '0'
  end
  object btnSetting: TButton
    Left = 248
    Top = 184
    Width = 113
    Height = 33
    Caption = #35774' '#32622
    TabOrder = 6
    OnClick = btnSettingClick
  end
  object grpCC: TGroupBox
    Left = 24
    Top = 240
    Width = 553
    Height = 73
    Caption = #36828#31243#25511#21046#36816#36716'/'#20572#27490#25805#20316
    TabOrder = 7
    object btnRun: TButton
      Left = 56
      Top = 24
      Width = 97
      Height = 33
      Caption = #36816'  '#36716
      TabOrder = 0
      OnClick = btnRunClick
    end
    object btnStop: TButton
      Left = 224
      Top = 24
      Width = 97
      Height = 33
      Caption = #20572'  '#27490
      TabOrder = 1
      OnClick = btnStopClick
    end
    object btn1: TButton
      Left = 392
      Top = 24
      Width = 97
      Height = 33
      Caption = #39034#24207#21551#21160#36816#36716
      TabOrder = 2
      OnClick = btn1Click
    end
  end
  object dblkcbbACAddress: TDBLookupComboBox
    Left = 144
    Top = 24
    Width = 113
    Height = 21
    KeyField = 'id'
    ListField = 'id'
    ListSource = dsID
    TabOrder = 8
    OnClick = dblkcbbACAddressClick
    OnExit = dblkcbbACAddressExit
    OnMouseDown = dblkcbbACAddressMouseDown
  end
  object dblkcbbAddress: TDBLookupComboBox
    Left = 448
    Top = 24
    Width = 113
    Height = 21
    KeyField = 'ACAddress'
    ListField = 'ACAddress'
    ListSource = dsAC
    TabOrder = 9
    OnClick = dblkcbbAddressClick
  end
  object statSetting: TStatusBar
    Left = 0
    Top = 324
    Width = 610
    Height = 19
    Panels = <>
    SimplePanel = False
  end
  object cbbid: TComboBox
    Left = 144
    Top = 24
    Width = 113
    Height = 21
    ItemHeight = 13
    TabOrder = 11
  end
  object cbbadd: TComboBox
    Left = 448
    Top = 24
    Width = 113
    Height = 21
    ItemHeight = 13
    TabOrder = 12
    Text = 'cbbadd'
  end
  object ADOqryAQAC: TADOQuery
    Connection = frmain.conAir
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from AC ')
    Left = 440
  end
  object dsAC: TDataSource
    DataSet = ADOqryAQAC
    Left = 472
  end
  object ADOqryID: TADOQuery
    Connection = frmain.conAir
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select distinct ID from AC')
    Left = 304
  end
  object dsID: TDataSource
    DataSet = ADOqryID
    Left = 328
  end
end