edtarchivesunit.dfm

工商收费系统,主要是管理非税收收入的费用的管理

inherited ArchivesEdtFrm: TArchivesEdtFrm
  Left = 352
  Top = 182
  Caption = #20010#20307#24037#21830#25143#26723#26696
  ClientHeight = 380
  ClientWidth = 590
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited CoolBar1: TCoolBar
    Width = 590
  end
  inherited ChBxNoCon: TdxCheckEdit
    Left = 455
    Top = 358
  end
  inherited pnl1: TPanel
    Width = 587
    Height = 307
    inherited lblCode: TLabel
      Left = 21
      Top = 20
      Width = 72
      Caption = #24037#21830#25143#20195#30721#65306
    end
    object lblPrincibal: TLabel [1]
      Left = 19
      Top = 56
      Width = 48
      Height = 13
      Caption = #36127#36131#20154#65306
    end
    object lblAddress: TLabel [2]
      Left = 19
      Top = 134
      Width = 36
      Height = 13
      Caption = #22320#22336#65306
    end
    object lblChargeItem1: TLabel [3]
      Left = 19
      Top = 168
      Width = 66
      Height = 13
      Caption = #25910#36153#39033#30446'1'#65306
    end
    object lblLogout: TLabel [4]
      Left = 19
      Top = 278
      Width = 36
      Height = 13
      Caption = #27880#38144#65306
    end
    object lblChargeItem3: TLabel [5]
      Left = 20
      Top = 240
      Width = 66
      Height = 13
      Caption = #25910#36153#39033#30446'3'#65306
    end
    object lblBisTitle: TLabel [6]
      Left = 213
      Top = 17
      Width = 72
      Height = 13
      Caption = #24037#21830#25143#21517#31216#65306
    end
    object lblPricIdCard: TLabel [7]
      Left = 212
      Top = 58
      Width = 84
      Height = 13
      Caption = #36127#36131#20154#36523#20221#35777#65306
    end
    object lblBisScope: TLabel [8]
      Left = 19
      Top = 96
      Width = 60
      Height = 13
      Caption = #33829#19994#33539#22260#65306
    end
    object lblChargeItem2: TLabel [9]
      Left = 19
      Top = 203
      Width = 66
      Height = 13
      Caption = #25910#36153#39033#30446'2'#65306
    end
    object lbl1Shutout: TLabel [10]
      Left = 334
      Top = 279
      Width = 36
      Height = 13
      Caption = #20572#19994#65306
    end
    inherited dbedtID: TDBEdit
      Left = 103
      Top = 19
      Width = 98
      DataField = #24037#21830#25143#20195#30721
      DataSource = DSObject
    end
    object dbedtPricibal: TDBEdit
      Left = 103
      Top = 55
      Width = 98
      Height = 21
      DataField = #36127#36131#20154
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      TabOrder = 2
    end
    object dbedtAddress: TDBEdit
      Left = 104
      Top = 130
      Width = 272
      Height = 21
      DataField = #22320#22336
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      TabOrder = 5
    end
    object dbedtBisTitle: TDBEdit
      Left = 323
      Top = 17
      Width = 218
      Height = 21
      DataField = #24037#21830#25143#21517#31216
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      TabOrder = 1
    end
    object dbedtPricIdCard: TDBEdit
      Left = 324
      Top = 54
      Width = 217
      Height = 21
      DataField = #36127#36131#20154#36523#20221#35777
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      TabOrder = 3
    end
    object dbedtBisScope: TDBEdit
      Left = 103
      Top = 93
      Width = 272
      Height = 21
      DataField = #33829#19994#33539#22260
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      TabOrder = 4
    end
    object dbcbbShutOut: TDBComboBox
      Left = 432
      Top = 276
      Width = 102
      Height = 21
      DataField = #20572#19994
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      ItemHeight = 13
      Items.Strings = (
        #21542
        #26159)
      TabOrder = 7
    end
    object dbcbbLogOut: TDBComboBox
      Left = 104
      Top = 275
      Width = 90
      Height = 21
      DataField = #27880#38144
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      ItemHeight = 13
      Items.Strings = (
        #21542
        #26159)
      TabOrder = 6
    end
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 104
      Top = 168
      Width = 273
      Height = 21
      DataField = #25910#36153#39033#30446#32534#30721'1'
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      KeyField = #39033#30446#32534#30721
      ListField = #39033#30446#21517#31216
      ListSource = DataSource1
      TabOrder = 8
    end
    object DBLookupComboBox2: TDBLookupComboBox
      Left = 104
      Top = 201
      Width = 273
      Height = 21
      DataField = #25910#36153#39033#30446#32534#30721'2'
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      KeyField = #39033#30446#32534#30721
      ListField = #39033#30446#21517#31216
      ListSource = DataSource1
      TabOrder = 9
    end
    object DBLookupComboBox3: TDBLookupComboBox
      Left = 104
      Top = 234
      Width = 273
      Height = 21
      DataField = #25910#36153#39033#30446#32534#30721'3'
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      KeyField = #39033#30446#32534#30721
      ListField = #39033#30446#21517#31216
      ListSource = DataSource1
      TabOrder = 10
    end
  end
  inherited AQeyObject: TADOQuery
    SQL.Strings = (
      'select * from archives')
  end
  inherited adoConnMain: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=zaixiang;Persist Security Info=True' +
      ';User ID=sa;Initial Catalog=Cahac_Charge;Data Source=sunzaixiang'
    Provider = 'SQLOLEDB.1'
    Left = 322
  end
  object ADODataSet1: TADODataSet
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    CommandText = 'FeeItems'
    CommandType = cmdTable
    Parameters = <>
    Left = 464
    Top = 216
  end
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Left = 416
    Top = 216
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=zaixiang;Persist Security Info=True' +
      ';User ID=sa;Initial Catalog=Cahac_Charge;Data Source=sunzaixiang'
    Provider = 'SQLOLEDB.1'
    Left = 512
    Top = 216
  end
end