edtarchivesunit.~dfm

来自「工商收费系统,主要是管理非税收收入的费用的管理」· ~DFM 代码 · 共 320 行

inherited ArchivesEdtFrm: TArchivesEdtFrm
  Left = 317
  Top = 130
  Caption = #19994#20027#26723#26696
  ClientHeight = 520
  ClientWidth = 586
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited lblMemo: TLabel
    Left = 101
    Top = 474
  end
  inherited CoolBar1: TCoolBar
    Width = 586
  end
  inherited ChBxNoCon: TdxCheckEdit
    Left = 289
    Top = 470
  end
  inherited pnl1: TPanel
    Width = 584
    Height = 421
    inherited lblCode: TLabel
      Left = 48
      Top = 3
      Width = 36
      Caption = #32534#30721#65306
      Visible = False
    end
    object lblBismanName: TLabel [1]
      Left = 44
      Top = 67
      Width = 48
      Height = 13
      Caption = #19994#20027#21517#31216
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object lblDateYjrq: TLabel [2]
      Left = 43
      Top = 100
      Width = 48
      Height = 13
      Caption = #24212#32564#26085#26399
    end
    object lbl4: TLabel [3]
      Left = 45
      Top = 130
      Width = 60
      Height = 13
      Caption = #32852#31995#30005#35805#65306
    end
    object lbl5: TLabel [4]
      Left = 49
      Top = 395
      Width = 51
      Height = 13
      Caption = #22791'         '#27880
    end
    object lblBiamanId: TLabel [5]
      Left = 43
      Top = 32
      Width = 48
      Height = 13
      Caption = #19994#20027#20195#30721
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object lblManager: TLabel [6]
      Left = 49
      Top = 160
      Width = 36
      Height = 13
      Caption = #36127#36131#20154
    end
    object lblManagerID: TLabel [7]
      Left = 40
      Top = 185
      Width = 84
      Height = 13
      Caption = #36127#36131#20154#36523#20221#35777#21495
    end
    object Label3: TLabel [8]
      Left = 56
      Top = 224
      Width = 3
      Height = 13
    end
    object lblYYFW: TLabel [9]
      Left = 43
      Top = 244
      Width = 48
      Height = 13
      Caption = #33829#19994#33539#22260
    end
    object lblFeeItem1: TLabel [10]
      Left = 42
      Top = 272
      Width = 54
      Height = 13
      Caption = #25910#36153#39033#30446'1'
    end
    object lblFeeItem2: TLabel [11]
      Left = 42
      Top = 301
      Width = 54
      Height = 13
      Caption = #25910#36153#39033#30446'2'
    end
    object lblFeeItem3: TLabel [12]
      Left = 42
      Top = 332
      Width = 54
      Height = 13
      Caption = #25910#36153#39033#30446'3'
    end
    object Label8: TLabel [13]
      Left = 48
      Top = 360
      Width = 57
      Height = 13
      Caption = #20572'           '#19994
    end
    object lblAddress: TLabel [14]
      Left = 48
      Top = 215
      Width = 54
      Height = 13
      Caption = #22320'          '#22336
    end
    object lblCancelBiz: TLabel [15]
      Left = 296
      Top = 362
      Width = 51
      Height = 13
      Caption = #27880'         '#38144
    end
    inherited dbedtID: TDBEdit
      Left = 155
      Top = 29
      DataField = #19994#20027#20195#30721
      DataSource = DSObject
    end
    object dbedtName: TDBEdit
      Left = 155
      Top = 63
      Width = 382
      Height = 21
      DataField = #19994#20027#21517#31216
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      TabOrder = 1
    end
    object dbedtManager: TDBEdit
      Left = 155
      Top = 94
      Width = 121
      Height = 21
      DataField = #24212#32564#26085#26399
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      TabOrder = 2
    end
    object dbedtPhone: TDBEdit
      Left = 155
      Top = 122
      Width = 121
      Height = 21
      DataField = #32852#31995#30005#35805
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      TabOrder = 3
    end
    object dbedtMemo: TDBEdit
      Left = 155
      Top = 392
      Width = 250
      Height = 21
      DataField = #22791#27880
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      TabOrder = 4
    end
    object DBEdit1: TDBEdit
      Left = 155
      Top = 153
      Width = 123
      Height = 21
      DataField = #36127#36131#20154
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 5
    end
    object DBEdit2: TDBEdit
      Left = 155
      Top = 182
      Width = 121
      Height = 21
      DataField = #36127#36131#20154#36523#20221#35777
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 6
    end
    object DBEdit3: TDBEdit
      Left = 154
      Top = 211
      Width = 384
      Height = 21
      DataField = #22320#22336
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 7
    end
    object DBEdit4: TDBEdit
      Left = 154
      Top = 240
      Width = 385
      Height = 21
      DataField = #33829#19994#33539#22260
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 8
    end
    object DBEdit8: TDBEdit
      Left = 152
      Top = 358
      Width = 105
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 9
    end
    object DBEdit9: TDBEdit
      Left = 360
      Top = 360
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 10
    end
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 155
      Top = 264
      Width = 293
      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 = 11
    end
    object DBLookupComboBox2: TDBLookupComboBox
      Left = 155
      Top = 293
      Width = 296
      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 = 12
    end
    object DBLookupComboBox3: TDBLookupComboBox
      Left = 155
      Top = 324
      Width = 297
      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 = 13
    end
  end
  inherited AQeyObject: TADOQuery
    CursorType = ctStatic
    SQL.Strings = (
      'select * from archives')
  end
  inherited adoConnMain: TADOConnection
    Provider = 'SQLOLEDB.1'
  end
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Left = 456
    Top = 336
  end
  object ADODataSet1: TADODataSet
    Connection = ADOConnection1
    CursorType = ctStatic
    CommandText = 'select * from Feeitem'
    Parameters = <>
    Left = 496
    Top = 336
  end
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=zaixiang;Persist Security Info=True' +
      ';User ID=sa;Initial Catalog=Cahac_Charge;Data Source=sunzaixiang'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 528
    Top = 336
  end
end