gzedit.dfm

工资管理系统的代码实例

object GzEditForm: TGzEditForm
  Left = 270
  Top = 248
  BorderStyle = bsDialog
  Caption = #24037#36164#20449#24687
  ClientHeight = 266
  ClientWidth = 432
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object pnlGzxx: TPanel
    Left = 0
    Top = 0
    Width = 432
    Height = 218
    Align = alClient
    BevelOuter = bvLowered
    TabOrder = 0
    object lblXm: TLabel
      Left = 248
      Top = 44
      Width = 44
      Height = 13
      AutoSize = False
      Caption = #22995#21517#65306
    end
    object lblZybh: TLabel
      Left = 18
      Top = 44
      Width = 72
      Height = 13
      AutoSize = False
      Caption = #32844#21592#32534#21495#65306
    end
    object lblJbgz: TLabel
      Left = 17
      Top = 98
      Width = 72
      Height = 13
      AutoSize = False
      Caption = #22522#26412#24037#36164#65306
    end
    object lblZwgz: TLabel
      Left = 220
      Top = 100
      Width = 73
      Height = 13
      AutoSize = False
      Caption = #32844#21153#24037#36164#65306
    end
    object lblBt: TLabel
      Left = 44
      Top = 151
      Width = 36
      Height = 13
      Caption = #34917#36148#65306
    end
    object lblKq: TLabel
      Left = 248
      Top = 151
      Width = 45
      Height = 13
      AutoSize = False
      Caption = #32771#21220#65306
    end
    object edtXm: TEdit
      Left = 296
      Top = 40
      Width = 100
      Height = 21
      Color = clSilver
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 1
    end
    object edtJbgz: TEdit
      Left = 92
      Top = 94
      Width = 100
      Height = 21
      Color = clSilver
      ReadOnly = True
      TabOrder = 2
    end
    object edtZwgz: TEdit
      Left = 296
      Top = 96
      Width = 100
      Height = 21
      Color = clSilver
      ReadOnly = True
      TabOrder = 3
    end
    object edtBt: TEdit
      Left = 91
      Top = 147
      Width = 100
      Height = 21
      TabOrder = 4
      Text = '0'
    end
    object edtKq: TEdit
      Left = 296
      Top = 148
      Width = 100
      Height = 21
      TabOrder = 5
      Text = '0'
    end
    object cbZybh: TComboBox
      Left = 92
      Top = 40
      Width = 100
      Height = 21
      ItemHeight = 13
      TabOrder = 0
      OnChange = cbZybhChange
    end
  end
  object pnlToolBar: TPanel
    Left = 0
    Top = 218
    Width = 432
    Height = 48
    Align = alBottom
    BevelOuter = bvLowered
    TabOrder = 1
    object btOK: TButton
      Left = 224
      Top = 11
      Width = 75
      Height = 25
      Caption = #30830#23450
      TabOrder = 0
      OnClick = btOKClick
    end
    object btCancel: TButton
      Left = 316
      Top = 11
      Width = 75
      Height = 25
      Caption = #21462#28040
      ModalResult = 2
      TabOrder = 1
    end
  end
end