u_adddata.dfm

来自「一个电力企业的后台管理程序」· DFM 代码 · 共 352 行

DFM
352
字号
object Frm_EditData: TFrm_EditData
  Left = 222
  Top = 117
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = '数据编辑...'
  ClientHeight = 269
  ClientWidth = 338
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 338
    Height = 225
    Align = alTop
    BevelInner = bvLowered
    BorderWidth = 3
    TabOrder = 0
    object Ntbk_Type: TNotebook
      Left = 5
      Top = 5
      Width = 328
      Height = 215
      Align = alClient
      PageIndex = 1
      TabOrder = 0
      object TPage
        Left = 0
        Top = 0
        Caption = '0'
        object Label1: TLabel
          Left = 13
          Top = 21
          Width = 72
          Height = 12
          Caption = '组织机构名称'
        end
        object Label2: TLabel
          Left = 13
          Top = 95
          Width = 48
          Height = 12
          Caption = '一般属性'
        end
        object Label3: TLabel
          Left = 13
          Top = 58
          Width = 48
          Height = 12
          Caption = '成立时间'
        end
        object Label4: TLabel
          Left = 172
          Top = 95
          Width = 24
          Height = 12
          Caption = '备注'
        end
        object edt_OrganName: TEdit
          Left = 91
          Top = 17
          Width = 228
          Height = 20
          TabOrder = 0
        end
        object DTP_OrganCreate: TDateTimePicker
          Left = 91
          Top = 51
          Width = 228
          Height = 20
          CalAlignment = dtaLeft
          Date = 37148.4062745139
          Time = 37148.4062745139
          DateFormat = dfLong
          DateMode = dmComboBox
          Kind = dtkDate
          ParseInput = False
          TabOrder = 1
        end
        object Mm_OrganProp: TMemo
          Left = 16
          Top = 112
          Width = 145
          Height = 98
          TabOrder = 2
        end
        object Mm_OrganNote: TMemo
          Left = 175
          Top = 112
          Width = 145
          Height = 98
          TabOrder = 3
        end
      end
      object TPage
        Left = 0
        Top = 0
        Caption = '1'
        object Label5: TLabel
          Left = 6
          Top = 13
          Width = 24
          Height = 12
          Caption = '工号'
        end
        object Label6: TLabel
          Left = 6
          Top = 146
          Width = 48
          Height = 12
          Caption = '一般属性'
        end
        object Label7: TLabel
          Left = 162
          Top = 39
          Width = 48
          Height = 12
          Caption = '成立时间'
        end
        object Label8: TLabel
          Left = 168
          Top = 146
          Width = 24
          Height = 12
          Caption = '备注'
        end
        object Label9: TLabel
          Left = 6
          Top = 39
          Width = 24
          Height = 12
          Caption = '姓名'
        end
        object Label10: TLabel
          Left = 6
          Top = 64
          Width = 24
          Height = 12
          Caption = '性别'
        end
        object Label11: TLabel
          Left = 162
          Top = 14
          Width = 24
          Height = 12
          Caption = '口令'
        end
        object Label12: TLabel
          Left = 162
          Top = 65
          Width = 30
          Height = 12
          Caption = '电话1'
        end
        object Label13: TLabel
          Left = 6
          Top = 90
          Width = 30
          Height = 12
          Caption = '电话2'
        end
        object Label14: TLabel
          Left = 162
          Top = 90
          Width = 30
          Height = 12
          Caption = '电话3'
        end
        object Label15: TLabel
          Left = 8
          Top = 121
          Width = 36
          Height = 12
          Caption = '功能组'
        end
        object Label16: TLabel
          Left = 162
          Top = 122
          Width = 48
          Height = 12
          Caption = '熟练程度'
        end
        object edt_WorkId: TEdit
          Left = 47
          Top = 9
          Width = 95
          Height = 20
          TabOrder = 0
        end
        object DTP_PersonCreate: TDateTimePicker
          Left = 215
          Top = 35
          Width = 106
          Height = 20
          CalAlignment = dtaLeft
          Date = 37148.4062745139
          Time = 37148.4062745139
          DateFormat = dfLong
          DateMode = dmComboBox
          Kind = dtkDate
          ParseInput = False
          TabOrder = 1
        end
        object Mm_PersonProp: TMemo
          Left = 16
          Top = 162
          Width = 142
          Height = 45
          TabOrder = 2
        end
        object Mm_PersonNote: TMemo
          Left = 179
          Top = 162
          Width = 142
          Height = 45
          TabOrder = 3
        end
        object edt_PersonName: TEdit
          Left = 47
          Top = 35
          Width = 95
          Height = 20
          TabOrder = 4
        end
        object Cmb_PersonSex: TComboBox
          Left = 47
          Top = 60
          Width = 96
          Height = 20
          ItemHeight = 12
          TabOrder = 5
          Items.Strings = (
            '男'
            '女')
        end
        object edt_PersonPass: TEdit
          Left = 215
          Top = 10
          Width = 106
          Height = 20
          TabOrder = 6
        end
        object Edt_Phone1: TEdit
          Left = 215
          Top = 61
          Width = 106
          Height = 20
          TabOrder = 7
        end
        object Edt_Phone2: TEdit
          Left = 47
          Top = 86
          Width = 96
          Height = 20
          TabOrder = 8
        end
        object Edt_Phone3: TEdit
          Left = 215
          Top = 86
          Width = 106
          Height = 20
          TabOrder = 9
        end
        object Cmb_AcdGroup: TComboBox
          Left = 47
          Top = 116
          Width = 97
          Height = 20
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ItemHeight = 12
          ParentFont = False
          TabOrder = 10
        end
        object Cmb_SkillLevel: TComboBox
          Left = 215
          Top = 114
          Width = 106
          Height = 20
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ItemHeight = 12
          ParentFont = False
          TabOrder = 11
        end
      end
    end
  end
  object btn_New: TBitBtn
    Left = 31
    Top = 236
    Width = 75
    Height = 25
    Caption = '继续新增'
    TabOrder = 1
    OnClick = btn_NewClick
  end
  object btn_Confirm: TBitBtn
    Left = 118
    Top = 236
    Width = 75
    Height = 25
    Caption = '确定'
    TabOrder = 2
    OnClick = btn_ConfirmClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333388F3333333333000033334224333333333333
      338338F3333333330000333422224333333333333833338F3333333300003342
      222224333333333383333338F3333333000034222A22224333333338F338F333
      8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
      33333338F83338F338F33333000033A33333A222433333338333338F338F3333
      0000333333333A222433333333333338F338F33300003333333333A222433333
      333333338F338F33000033333333333A222433333333333338F338F300003333
      33333333A222433333333333338F338F00003333333333333A22433333333333
      3338F38F000033333333333333A223333333333333338F830000333333333333
      333A333333333333333338330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object btn_Cancel: TBitBtn
    Left = 205
    Top = 236
    Width = 75
    Height = 25
    Caption = '取消'
    TabOrder = 3
    OnClick = btn_CancelClick
    Kind = bkCancel
  end
end

⌨️ 快捷键说明

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