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

📄 myinforset.dfm

📁 絮语2007视频聊天软件源程序.仅供参考
💻 DFM
📖 第 1 页 / 共 2 页
字号:
object myinfor_set: Tmyinfor_set
  Left = 194
  Top = 116
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = '个性化设置'
  ClientHeight = 302
  ClientWidth = 472
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  Scaled = False
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 472
    Height = 302
    ActivePage = TabSheet1
    Align = alClient
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = '个人资料'
      object Bevel1: TBevel
        Left = 8
        Top = 72
        Width = 449
        Height = 169
        Shape = bsFrame
      end
      object myimg: TImage
        Left = 16
        Top = 112
        Width = 120
        Height = 120
        Center = True
        Stretch = True
      end
      object Bevel2: TBevel
        Left = 8
        Top = 8
        Width = 449
        Height = 60
        Shape = bsFrame
      end
      object Label1: TLabel
        Left = 16
        Top = 20
        Width = 33
        Height = 13
        Caption = '昵称:'
        Transparent = True
      end
      object Bevel6: TBevel
        Left = 144
        Top = 80
        Width = 3
        Height = 153
        Shape = bsRightLine
      end
      object Label4: TLabel
        Left = 152
        Top = 84
        Width = 52
        Height = 13
        Caption = '自我介绍'
      end
      object Label6: TLabel
        Left = 240
        Top = 24
        Width = 33
        Height = 13
        Caption = '电话:'
      end
      object Label7: TLabel
        Left = 16
        Top = 48
        Width = 33
        Height = 13
        Caption = '职务:'
        Transparent = True
      end
      object Label8: TLabel
        Left = 240
        Top = 48
        Width = 33
        Height = 13
        Caption = '部门:'
        Transparent = True
      end
      object uname: TEdit
        Left = 56
        Top = 16
        Width = 121
        Height = 22
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -14
        Font.Name = '宋体'
        Font.Style = []
        MaxLength = 16
        ParentFont = False
        TabOrder = 0
        OnKeyPress = pwd1KeyPress
      end
      object tel: TEdit
        Left = 288
        Top = 16
        Width = 153
        Height = 21
        MaxLength = 16
        TabOrder = 1
        Text = 'tel'
        OnKeyPress = pwd1KeyPress
      end
      object memo1: TRichEdit
        Left = 152
        Top = 112
        Width = 297
        Height = 121
        Lines.Strings = (
          'memo1')
        MaxLength = 200
        TabOrder = 4
      end
      object xpButton2: TxpButton
        Left = 376
        Top = 246
        Width = 75
        Height = 25
        Caption = '应用'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        TabOrder = 5
        TabStop = True
        OnClick = xpButton2Click
      end
      object xpButton4: TxpButton
        Left = 16
        Top = 80
        Width = 121
        Height = 25
        Caption = '自定义形象照片'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        TabOrder = 6
        TabStop = True
        OnClick = xpButton4Click
      end
      object business: TEdit
        Left = 56
        Top = 40
        Width = 121
        Height = 21
        MaxLength = 16
        TabOrder = 2
        OnKeyPress = pwd1KeyPress
      end
      object dept: TEdit
        Left = 288
        Top = 40
        Width = 153
        Height = 21
        MaxLength = 16
        TabOrder = 3
        OnKeyPress = pwd1KeyPress
      end
    end
    object TabSheet2: TTabSheet
      Caption = '系统设置'
      ImageIndex = 1
      object Bevel3: TBevel
        Left = 8
        Top = 221
        Width = 345
        Height = 36
        Shape = bsFrame
      end
      object Label2: TLabel
        Left = 19
        Top = 232
        Width = 111
        Height = 13
        Caption = '文件自动保存路径:'
      end
      object GroupBox4: TGroupBox
        Left = 8
        Top = 92
        Width = 449
        Height = 41
        Caption = '热键设置'
        TabOrder = 0
        object Label3: TLabel
          Left = 18
          Top = 18
          Width = 59
          Height = 13
          Caption = '系统呼出:'
          Transparent = True
        end
        object Label12: TLabel
          Left = 234
          Top = 18
          Width = 46
          Height = 13
          Caption = '老板键:'
          Transparent = True
        end
        object hotkey2: THotKey
          Left = 96
          Top = 14
          Width = 105
          Height = 19
          HotKey = 0
          InvalidKeys = [hcNone, hcShift, hcShiftCtrl, hcShiftAlt, hcShiftCtrlAlt]
          Modifiers = []
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
        end
        object HotKey4: THotKey
          Left = 312
          Top = 14
          Width = 121
          Height = 19
          HotKey = 0
          InvalidKeys = [hcNone, hcShift, hcShiftCtrl, hcShiftAlt, hcShiftCtrlAlt]
          Modifiers = []
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
        end
      end
      object GroupBox6: TGroupBox
        Left = 8
        Top = 0
        Width = 449
        Height = 89
        Caption = '选项'
        TabOrder = 1
        object CheckBox3: TCheckBox
          Left = 16
          Top = 64
          Width = 161
          Height = 17
          Caption = '收到新的消息自动弹出'
          TabOrder = 0
        end
        object CheckBox7: TCheckBox
          Left = 16
          Top = 32
          Width = 137
          Height = 17
          Caption = '随系统启动自动运行'
          TabOrder = 1
        end
        object CheckBox9: TCheckBox
          Left = 16
          Top = 48
          Width = 169
          Height = 17
          Caption = '当接收到消息时声音提醒'
          Checked = True
          State = cbChecked
          TabOrder = 2
        end
        object CheckBox10: TCheckBox
          Left = 16
          Top = 16
          Width = 153
          Height = 17
          Caption = '当文件存在时进行续传'
          TabOrder = 3
        end
        object CheckBox11: TCheckBox
          Left = 232
          Top = 16
          Width = 103
          Height = 17
          Caption = '自动接收文件'
          Checked = True
          State = cbChecked
          TabOrder = 4
        end
        object CheckBox12: TCheckBox
          Left = 232
          Top = 32
          Width = 105
          Height = 17
          Caption = '启动时最小化'
          TabOrder = 5
        end
        object CheckBox5: TCheckBox
          Left = 232
          Top = 64
          Width = 145
          Height = 17
          Caption = '关闭主窗口时最小化'
          TabOrder = 6
        end
        object CheckBox2: TCheckBox
          Left = 232
          Top = 48
          Width = 97
          Height = 17
          Caption = '启用图片文字'
          TabOrder = 7
        end
      end
      object GroupBox5: TGroupBox
        Left = 8
        Top = 136
        Width = 449
        Height = 81
        Caption = '消息提示声音'
        TabOrder = 2
        object Edit3: TEdit
          Left = 128
          Top = 51
          Width = 305
          Height = 21
          Color = clWhite
          ReadOnly = True
          TabOrder = 0
        end
        object Edit4: TEdit
          Left = 128
          Top = 27
          Width = 305
          Height = 21
          Color = clWhite
          TabOrder = 1
          Text = 'MSO7L4BBPBBPBBP'
          OnChange = Edit4Change
        end
        object RadioButton4: TRadioButton
          Left = 128
          Top = 9
          Width = 129
          Height = 17
          Caption = '使用系统音频设备'
          Checked = True
          TabOrder = 2
          TabStop = True
          OnClick = RadioButton4Click
        end
        object RadioButton5: TRadioButton
          Left = 264
          Top = 9
          Width = 89
          Height = 17
          Caption = '使用PC喇叭'
          TabOrder = 3
          OnClick = RadioButton4Click
        end
        object xpButton5: TxpButton
          Left = 8
          Top = 25
          Width = 81
          Height = 25
          Caption = '试听'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          TabOrder = 4
          TabStop = True
          OnClick = xpButton5Click
        end
        object xpButton6: TxpButton
          Left = 8
          Top = 49
          Width = 81
          Height = 25
          Caption = '选择'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          TabOrder = 5
          TabStop = True
          OnClick = xpButton6Click
        end
      end
      object xpButton7: TxpButton

⌨️ 快捷键说明

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