chaxununit1.~dfm

实现了断路器群控系统

object chaxun: Tchaxun
  Left = 224
  Top = 144
  Width = 630
  Height = 480
  Caption = #26597#35810#21442#25968#34920
  Color = clSkyBlue
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 8
    Top = 80
    Width = 601
    Height = 358
    Color = clWhite
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #24188#22278
    Font.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
    ParentFont = False
    TabOrder = 0
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -19
    TitleFont.Name = #38582#20070
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'canshuming'
        PickList.Strings = (
          '1111')
        Title.Caption = #21442#25968#21517#31216
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = #24188#22278
        Title.Font.Style = []
        Width = 97
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'canshuzhi'
        Title.Caption = #21442#25968#20540
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = #24188#22278
        Title.Font.Style = []
        Width = 114
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'riqi'
        Title.Caption = #26085#26399
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = #24188#22278
        Title.Font.Style = []
        Width = 123
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'shijian'
        Title.Caption = #26102#38388
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = #24188#22278
        Title.Font.Style = []
        Width = 132
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'shebeiming'
        Title.Caption = #25152#23646#35774#22791
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = #24188#22278
        Title.Font.Style = []
        Width = 195
        Visible = True
      end>
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 409
    Height = 65
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #38582#20070
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Label2: TLabel
      Left = 234
      Top = 26
      Width = 48
      Height = 16
      Caption = #26085#26399#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #24188#22278
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 11
      Top = 26
      Width = 64
      Height = 16
      Caption = #35774#22791#21517#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #24188#22278
      Font.Style = []
      ParentFont = False
    end
    object DateTimePicker1: TDateTimePicker
      Left = 288
      Top = 24
      Width = 105
      Height = 24
      Date = 39000.347782650460000000
      Time = 39000.347782650460000000
      TabOrder = 0
      OnClick = DateTimePicker1Click
      OnChange = DateTimePicker1Click
    end
    object ComboBox1: TComboBox
      Left = 72
      Top = 24
      Width = 145
      Height = 24
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #24188#22278
      Font.Style = []
      ItemHeight = 16
      ParentFont = False
      TabOrder = 1
      OnChange = ComboBox1Click
      OnClick = ComboBox1Click
      Items.Strings = (
        #26029#36335#22120'1'
        #26029#36335#22120'2'
        #26029#36335#22120'3')
    end
  end
  object Button1: TButton
    Left = 520
    Top = 32
    Width = 73
    Height = 25
    Caption = #36820#22238
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #24188#22278
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = Button1Click
  end
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Left = 424
    Top = 32
  end
  object ADODataSet1: TADODataSet
    CursorType = ctStatic
    Parameters = <>
    Left = 454
    Top = 32
  end
end