unit1.dfm

电力系统集中抄表 采集器 上位机软件 可以经行集中抄表

    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 12
    OnClick = deleteClick
  end
  object DBFdir: TEdit
    Left = 297
    Top = 239
    Width = 173
    Height = 24
    TabOrder = 13
    Text = 'DBFdir'
    Visible = False
  end
  object Break: TEdit
    Left = 583
    Top = 239
    Width = 173
    Height = 24
    TabOrder = 14
    Visible = False
  end
  object dbgrid2select: TEdit
    Left = 297
    Top = 170
    Width = 173
    Height = 24
    TabOrder = 15
    Visible = False
  end
  object changejzqhao: TEdit
    Left = 514
    Top = 201
    Width = 173
    Height = 24
    TabOrder = 16
    Text = 'changejzqhao'
    Visible = False
  end
  object DBGrid3: TDBGrid
    Left = 200
    Top = 0
    Width = 581
    Height = 373
    DataSource = DataSource3
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
    ParentFont = False
    TabOrder = 17
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object ComboBox1: TComboBox
    Left = 104
    Top = 416
    Width = 89
    Height = 24
    Color = clMoneyGreen
    Ctl3D = True
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 16
    ItemIndex = 0
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 18
    Text = '9600'
    Items.Strings = (
      '9600'
      '1200')
  end
  object DBGrid4: TDBGrid
    Left = 369
    Top = 160
    Width = 144
    Height = 50
    DataSource = DataSource4
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 19
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -14
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    Visible = False
  end
  object Editsort: TEdit
    Left = 231
    Top = 459
    Width = 173
    Height = 24
    TabOrder = 20
    Text = '0'
    Visible = False
  end
  object Database1: TDatabase
    SessionName = 'Default'
    Left = 272
    Top = 240
  end
  object OpenDialog1: TOpenDialog
    Options = [ofHideReadOnly, ofAllowMultiSelect, ofEnableSizing]
    Left = 248
    Top = 72
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 240
    Top = 240
  end
  object ADOQuery1: TADOQuery
    Parameters = <>
    Left = 208
    Top = 240
  end
  object PopupMenu1: TPopupMenu
    Left = 208
    Top = 72
    object ReadTime: TMenuItem
      Caption = #35835#26102#38388
      OnClick = ReadTimeClick
    end
    object dd21: TMenuItem
      Caption = #35774#32622#26102#38388
      OnClick = dd21Click
    end
    object dd31: TMenuItem
      Caption = #35835#29256#26412
      OnClick = dd31Click
    end
    object N9: TMenuItem
      Caption = #28165#31354
      OnClick = N9Click
    end
    object N10: TMenuItem
      Caption = #22797#20301
      OnClick = N10Click
    end
    object N12: TMenuItem
      Caption = '-'
    end
    object N1: TMenuItem
      Caption = #19979#36733#30005#34920#32534#21495
      OnClick = N1Click
    end
    object N2: TMenuItem
      Caption = #19979#36733#20027#27969#31243
      OnClick = N2Click
    end
    object N13: TMenuItem
      Caption = '-'
    end
    object N3: TMenuItem
      Caption = #23454#26102#25220#25910
      OnClick = N3Click
    end
    object N4: TMenuItem
      Caption = #23454#26102#34917#25220
      OnClick = N4Click
    end
    object N15: TMenuItem
      Caption = '-'
    end
    object N5: TMenuItem
      Caption = #19978#35013#24403#26085#25968#25454
      OnClick = N5Click
    end
    object N6: TMenuItem
      Caption = #19978#35013#24403#26376#25968#25454
      OnClick = N6Click
    end
    object N7: TMenuItem
      Caption = #19979#35013#25220#34920#26085
      OnClick = N7Click
    end
    object N8: TMenuItem
      Caption = #25220#25351#23450#26085#25968#25454
      OnClick = N8Click
    end
    object N14: TMenuItem
      Caption = '-'
    end
    object xiugaijzq: TMenuItem
      Caption = #25913#38598#20013#22120#21495
      OnClick = xiugaijzqClick
    end
    object rrrr1: TMenuItem
      Caption = #20013#26029
      OnClick = rrrr1Click
    end
    object N22: TMenuItem
      Caption = '-'
    end
    object N21: TMenuItem
      Caption = #29983#25104#20013#38388#24211
      OnClick = N21Click
    end
    object N23: TMenuItem
      Caption = #26597#30475#25220#34920#26426#20013#38388#24211
      OnClick = N23Click
    end
    object N24: TMenuItem
      Caption = #26597#30475#38598#20013#22120#20013#38388#24211
      OnClick = N24Click
    end
    object N26: TMenuItem
      Caption = '-'
    end
    object N27: TMenuItem
      Caption = #19979#35013#20013#38388#24211
      OnClick = N27Click
    end
    object N28: TMenuItem
      Caption = #29983#25104#30005#34920#23616#32534#21495
      OnClick = N28Click
    end
    object N29: TMenuItem
      Caption = #19979#35013#30005#34920#23616#32534#21495'('#25220#34920#26426')'
      OnClick = N29Click
    end
    object gai1: TMenuItem
      Caption = #26684#24335#25968#25454#24211#29256#26412
      OnClick = gai1Click
    end
    object N35: TMenuItem
      Caption = #26684#24335#21270#29615#23431#34920#22836
      OnClick = N35Click
    end
  end
  object PopupMenu2: TPopupMenu
    Left = 288
    Top = 72
    object N11: TMenuItem
      Caption = #28857#25220
      OnClick = N11Click
    end
    object N16: TMenuItem
      Caption = #26684#24335#21270#25968#25454#24211
      OnClick = N16Click
    end
    object N30: TMenuItem
      Caption = #26597#30475#22522#26412#20449#24687
      Visible = False
      OnClick = N30Click
    end
    object n34: TMenuItem
      Caption = #28165#31354#26087#25968#25454
      OnClick = n34Click
    end
  end
  object ADOQuery2: TADOQuery
    Parameters = <>
    Left = 24
    Top = 224
  end
  object Database2: TDatabase
    SessionName = 'Default'
    Left = 56
    Top = 224
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 96
    Top = 224
  end
  object ADOQuery3: TADOQuery
    Parameters = <>
    Left = 472
    Top = 256
  end
  object DataSource3: TDataSource
    DataSet = ADOQuery3
    Left = 536
    Top = 256
  end
  object Database3: TDatabase
    SessionName = 'Default'
    Left = 504
    Top = 256
  end
  object PopupMenu3: TPopupMenu
    Left = 336
    Top = 72
    object N25: TMenuItem
      Caption = #29983#25104#22810#20010#30005#34920#32534#21495
      OnClick = N25Click
    end
    object N17: TMenuItem
      Caption = #29983#25104#25220#34920#26426#20013#38388#24211
      OnClick = N17Click
    end
    object N18: TMenuItem
      Caption = '-'
    end
    object N19: TMenuItem
      Caption = #26597#30475#25220#34920#26426#20013#38388#24211
      OnClick = N19Click
    end
    object N20: TMenuItem
      Caption = #26597#30475#38598#20013#22120#20013#38388#24211
      OnClick = N20Click
    end
    object N31: TMenuItem
      Caption = '-'
    end
    object N32: TMenuItem
      Caption = #19979#35013#30005#34920#23616#32534#21495
      OnClick = N29Click
    end
    object N33: TMenuItem
      Caption = #19979#35013#20013#38388#24211
      OnClick = N27Click
    end
  end
  object ADOQuery4: TADOQuery
    Parameters = <>
    Left = 392
    Top = 424
  end
  object Database4: TDatabase
    SessionName = 'Default'
    Left = 432
    Top = 424
  end
  object DataSource4: TDataSource
    DataSet = ADOQuery4
    Left = 480
    Top = 424
  end
  object DataSource5: TDataSource
    Left = 96
    Top = 8
  end
  object Table1: TTable
    Left = 384
    Top = 256
  end
  object ADOCommand1: TADOCommand
    ConnectionString = 
      'Provider=MSDASQL.1;Persist Security Info=False;Data Source=Visua' +
      'l FoxPro Database;Extended Properties="DSN=Visual FoxPro Databas' +
      'e;UID=;SourceDB=c:\WINDOWS\Desktop\back\DBF2;SourceType=DBF;Excl' +
      'usive=No;BackgroundFetch=Yes;Collate=Machine;Null=Yes;Deleted=Ye' +
      's;"'
    Parameters = <>
    Left = 440
    Top = 256
  end
  object Table2: TTable
    Left = 408
    Top = 256
  end
end