⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 u_change.~dfm

📁 主要是对人员信息和工资进行管理
💻 ~DFM
字号:
object F_change: TF_change
  Left = 192
  Top = 114
  Width = 264
  Height = 473
  ActiveControl = i_id
  Caption = #20154#20107#21464#21160
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 35
    Top = 27
    Width = 57
    Height = 13
    AutoSize = False
    Caption = #21592#24037#21495
  end
  object Label5: TLabel
    Left = 24
    Top = 285
    Width = 105
    Height = 13
    AutoSize = False
    Caption = #20855#20307#25551#36848
  end
  object Label6: TLabel
    Left = 40
    Top = 128
    Width = 57
    Height = 13
    AutoSize = False
    Caption = #26102#38388
  end
  object i_id: TEdit
    Left = 88
    Top = 24
    Width = 121
    Height = 21
    TabOrder = 0
    Text = 'i_id'
    OnChange = i_idChange
  end
  object i_change: TRadioGroup
    Left = 25
    Top = 51
    Width = 189
    Height = 65
    Caption = #21464#21160#24773#20917
    Columns = 2
    ItemIndex = 0
    Items.Strings = (
      #32844#21153#21464#26356
      #36766#32844
      #36864#20241
      #35843#31163)
    TabOrder = 1
  end
  object GroupBox1: TGroupBox
    Left = 24
    Top = 151
    Width = 201
    Height = 127
    Caption = #21592#24037#20449#24687
    TabOrder = 2
    object Label2: TLabel
      Left = 24
      Top = 32
      Width = 65
      Height = 13
      AutoSize = False
      Caption = #22995#21517
    end
    object Label3: TLabel
      Left = 24
      Top = 64
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #37096#38376
    end
    object Label4: TLabel
      Left = 24
      Top = 98
      Width = 73
      Height = 13
      AutoSize = False
      Caption = #32844#21153
    end
    object i_name: TDBEdit
      Left = 64
      Top = 28
      Width = 121
      Height = 21
      DataField = 'NAME'
      DataSource = DataM.Ds_user
      ReadOnly = True
      TabOrder = 0
    end
    object i_department: TDBLookupComboBox
      Left = 64
      Top = 58
      Width = 121
      Height = 21
      DataField = 'DEPARTMENT'
      DataSource = DataM.Ds_user
      KeyField = 'ID'
      ListField = 'NAME'
      ListSource = DataM.ds_department
      TabOrder = 1
    end
    object i_job: TDBLookupComboBox
      Left = 64
      Top = 90
      Width = 121
      Height = 21
      DataField = 'JOB'
      DataSource = DataM.Ds_user
      KeyField = 'CODE'
      ListField = 'DESCRIPT'
      ListSource = DataM.ds_job
      TabOrder = 2
    end
  end
  object i_description: TMemo
    Left = 24
    Top = 309
    Width = 201
    Height = 89
    Lines.Strings = (
      'i_description')
    TabOrder = 3
  end
  object BitBtn1: TBitBtn
    Left = 88
    Top = 405
    Width = 75
    Height = 25
    Caption = #20462#25913
    Default = True
    TabOrder = 4
    OnClick = BitBtn1Click
  end
  object i_time: TMaskEdit
    Left = 88
    Top = 122
    Width = 120
    Height = 21
    EditMask = '!0000/00/00;1;_'
    MaxLength = 10
    TabOrder = 5
    Text = '    -  -  '
  end
end

⌨️ 快捷键说明

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