edtdeptunit.dfm

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

DFM
110
字号
inherited DepartEdtFrm: TDepartEdtFrm
  Left = 350
  Top = 158
  Caption = #37096#38376
  ClientWidth = 429
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited lblMemo: TLabel
    Left = 101
  end
  inherited CoolBar1: TCoolBar
    Width = 429
  end
  inherited ChBxNoCon: TdxCheckEdit
    Left = 289
    Top = 355
  end
  inherited pnl1: TPanel
    Height = 307
    inherited lblCode: TLabel
      Left = 72
      Top = 36
      Width = 36
      Caption = #32534#30721#65306
    end
    object lbl2: TLabel [1]
      Left = 70
      Top = 72
      Width = 60
      Height = 13
      Caption = #37096#38376#21517#31216#65306
    end
    object lbl3: TLabel [2]
      Left = 70
      Top = 113
      Width = 72
      Height = 13
      Caption = #37096#38376#36127#36131#20154#65306
    end
    object lbl4: TLabel [3]
      Left = 70
      Top = 154
      Width = 60
      Height = 13
      Caption = #32852#31995#30005#35805#65306
    end
    object lbl5: TLabel [4]
      Left = 70
      Top = 195
      Width = 36
      Height = 13
      Caption = #22791#27880#65306
    end
    inherited dbedtID: TDBEdit
      Left = 155
      Top = 29
      DataField = #32534#30721
      DataSource = DSObject
    end
    object dbedtName: TDBEdit
      Left = 155
      Top = 69
      Width = 121
      Height = 21
      DataField = #37096#38376#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 = 108
      Width = 121
      Height = 21
      DataField = #37096#38376#36127#36131#20154
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      TabOrder = 2
    end
    object dbedtPhone: TDBEdit
      Left = 155
      Top = 151
      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 = 192
      Width = 250
      Height = 21
      DataField = #22791#27880
      DataSource = DSObject
      ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
      TabOrder = 4
    end
  end
  inherited AQeyObject: TADOQuery
    SQL.Strings = (
      'select * from department')
  end
  inherited adoConnMain: TADOConnection
    Provider = 'SQLOLEDB.1'
  end
end

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?