timeset.dfm

路灯控制 可以实现路灯远程开关等

    Height = 449
    TabFont.Charset = DEFAULT_CHARSET
    TabFont.Color = clBtnText
    TabFont.Height = -11
    TabFont.Name = 'MS Sans Serif'
    TabFont.Style = []
    TabOrder = 1
    object TTabPage
      Left = 4
      Top = 24
      Caption = #24320#20851#28783#26102#38388#34920
      object GroupBox2: TGroupBox
        Left = 0
        Top = 0
        Width = 745
        Height = 105
        TabOrder = 0
        object Label2: TLabel
          Left = 21
          Top = 25
          Width = 72
          Height = 13
          Caption = #26102#38388#34920#21517#31216'    '
        end
        object Label3: TLabel
          Left = 232
          Top = 25
          Width = 60
          Height = 13
          Caption = #24320#28783#26102#38388'    '
        end
        object Label10: TLabel
          Left = 25
          Top = 77
          Width = 72
          Height = 13
          Caption = #20809#29031#24230#19978#38480'    '
        end
        object Label11: TLabel
          Left = 240
          Top = 77
          Width = 69
          Height = 13
          Caption = #20809#29031#24230#19979#38480'   '
        end
        object Label12: TLabel
          Left = 447
          Top = 76
          Width = 69
          Height = 13
          Caption = #26102#38388#20559#31227#37327'   '
        end
        object Label1: TLabel
          Left = 440
          Top = 26
          Width = 57
          Height = 13
          Caption = #20851#28783#26102#38388'   '
        end
        object Edit1: TEdit
          Left = 96
          Top = 22
          Width = 121
          Height = 21
          TabOrder = 0
          Text = 'Edit1'
        end
        object Edit7: TEdit
          Left = 520
          Top = 72
          Width = 106
          Height = 21
          TabOrder = 1
          Text = '0'
        end
        object UpDown4: TUpDown
          Left = 626
          Top = 72
          Width = 16
          Height = 21
          Associate = Edit7
          Min = 0
          Position = 0
          TabOrder = 2
          Wrap = False
        end
        object Edit9: TEdit
          Left = 96
          Top = 73
          Width = 106
          Height = 21
          TabOrder = 3
          Text = '0'
        end
        object UpDown5: TUpDown
          Left = 202
          Top = 73
          Width = 16
          Height = 21
          Associate = Edit9
          Min = 0
          Position = 0
          TabOrder = 4
          Wrap = False
        end
        object Edit10: TEdit
          Left = 315
          Top = 73
          Width = 106
          Height = 21
          TabOrder = 5
          Text = '0'
        end
        object UpDown6: TUpDown
          Left = 421
          Top = 73
          Width = 16
          Height = 21
          Associate = Edit10
          Min = 0
          Position = 0
          TabOrder = 6
          Wrap = False
        end
        object DateTimePicker1: TDateTimePicker
          Left = 294
          Top = 21
          Width = 113
          Height = 21
          CalAlignment = dtaLeft
          Date = 39308.3980951505
          Time = 39308.3980951505
          DateFormat = dfShort
          DateMode = dmComboBox
          Kind = dtkTime
          ParseInput = False
          TabOrder = 7
        end
        object DateTimePicker2: TDateTimePicker
          Left = 502
          Top = 22
          Width = 97
          Height = 21
          CalAlignment = dtaLeft
          Date = 39308.3985044097
          Time = 39308.3985044097
          DateFormat = dfShort
          DateMode = dmComboBox
          Kind = dtkTime
          ParseInput = False
          TabOrder = 8
        end
        object CheckBox1: TCheckBox
          Left = 624
          Top = 24
          Width = 105
          Height = 17
          Caption = #26159#21542#37319#29992#20809#25511'      '
          TabOrder = 9
        end
      end
      object DBGrid1: TDBGrid
        Left = 0
        Top = 108
        Width = 750
        Height = 309
        DataSource = DataSource_SJ1
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
      end
    end
  end
  object DataSource_SJ1: TDataSource
    DataSet = DataModule1.ADO_SJ1
    OnDataChange = DataSource_SJ1DataChange
    Left = 568
    Top = 16
  end
  object DataSource_SJ2: TDataSource
    DataSet = DataModule1.ADO_SJ2
    Left = 616
    Top = 16
  end
end