edtpayeeunit.dfm

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

inherited PayeeEdtFrm: TPayeeEdtFrm
  Left = 330
  Top = 215
  Caption = #25910#27454#20154
  ClientHeight = 386
  ClientWidth = 582
  OldCreateOrder = True
  Position = poDesktopCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited lblMemo: TLabel
    Left = 8
    Width = 409
    Caption = #27880#24847#65306#19968#12289#32534#30721#20026#24517#22635#39033#65307#20108#12289#25910#27454#20154#19981#19968#23450#26159#27492#36719#20214#30340#25805#20316#21592
  end
  inherited CoolBar1: TCoolBar
    Width = 582
  end
  inherited ChBxNoCon: TdxCheckEdit
    Left = 440
    Top = 355
  end
  inherited pnl1: TPanel
    Width = 584
    Height = 307
    inherited lblCode: TLabel
      Left = 72
      Top = 36
      Width = 60
      Caption = #32534'        '#30721#65306
    end
    object lblPayee: TLabel [1]
      Left = 70
      Top = 91
      Width = 72
      Height = 13
      Caption = #25910#27454#20154#22995#21517#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object lblDepartment: TLabel [2]
      Left = 70
      Top = 141
      Width = 60
      Height = 13
      Caption = #25152#23646#37096#38376#65306
    end
    object lblNote: TLabel [3]
      Left = 70
      Top = 195
      Width = 36
      Height = 13
      Caption = #22791#27880#65306
    end
    inherited dbedtID: TDBEdit
      Left = 155
      Top = 34
      Width = 70
      DataField = #32534#30721
      DataSource = DSObject
    end
    object dbedtName: TDBEdit
      Left = 155
      Top = 87
      Width = 101
      Height = 21
      DataField = #22995#21517
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 1
    end
    object dbedtMemo: TDBEdit
      Left = 155
      Top = 192
      Width = 250
      Height = 21
      DataField = #22791#27880
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      TabOrder = 2
    end
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 152
      Top = 136
      Width = 145
      Height = 21
      DataField = #37096#38376#32534#30721
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      KeyField = #32534#30721
      ListField = #37096#38376#21517#31216
      ListSource = DataSource1
      TabOrder = 3
    end
  end
  inherited AQeyObject: TADOQuery
    SQL.Strings = (
      'select * from payee')
  end
  inherited adoConnMain: TADOConnection
    Provider = 'SQLOLEDB.1'
  end
  object ADODataSet1: TADODataSet
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=zaixiang;Persist Security Info=True' +
      ';User ID=sa;Initial Catalog=Cahac_Charge;Data Source=SUNZAIXIANG'
    CommandText = 'department'
    CommandType = cmdTable
    Parameters = <>
    Left = 456
    Top = 152
  end
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Left = 416
    Top = 152
  end
  object DataSource2: TDataSource
    DataSet = AQeyObject
    Left = 296
    Top = 72
  end
end