myinforset.dfm

絮语2007视频聊天软件源程序.仅供参考

        Left = 360
        Top = 229
        Width = 75
        Height = 25
        Caption = '应用'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        TabOrder = 3
        TabStop = True
        OnClick = xpButton7Click
      end
      object Edit2: TEdit
        Left = 136
        Top = 228
        Width = 209
        Height = 21
        ReadOnly = True
        TabOrder = 4
      end
      object Button1: TButton
        Left = 308
        Top = 230
        Width = 35
        Height = 18
        Caption = '修改'
        TabOrder = 5
        OnClick = Button1Click
      end
    end
    object TabSheet3: TTabSheet
      Caption = '状态回复'
      ImageIndex = 2
      object GroupBox9: TGroupBox
        Left = 8
        Top = 8
        Width = 449
        Height = 233
        Caption = '状态与回复语'
        TabOrder = 3
        object Label13: TLabel
          Left = 64
          Top = 206
          Width = 202
          Height = 13
          Caption = '分钟鼠标键盘无动作时,自动切换到'
        end
        object SpinEdit1: TSpinEdit
          Left = 8
          Top = 201
          Width = 49
          Height = 22
          MaxValue = 30
          MinValue = 1
          TabOrder = 0
          Value = 1
        end
        object ComboBox1: TComboBox
          Left = 272
          Top = 201
          Width = 73
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 1
          Items.Strings = (
            '离开状态'
            '隐身状态'
            '离线状态')
        end
        object Edit1: TEdit
          Left = 8
          Top = 160
          Width = 345
          Height = 21
          MaxLength = 32
          TabOrder = 2
        end
        object ListBox1: TListBox
          Left = 8
          Top = 16
          Width = 433
          Height = 137
          ItemHeight = 16
          Style = lbOwnerDrawFixed
          TabOrder = 3
          OnClick = ListBox1Click
        end
      end
      object CheckBox1: TCheckBox
        Left = 16
        Top = 190
        Width = 129
        Height = 17
        Caption = '允许自动转换状态'
        TabOrder = 0
      end
      object xpButton11: TxpButton
        Left = 368
        Top = 168
        Width = 40
        Height = 25
        Caption = '添加'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        TabOrder = 1
        TabStop = True
        OnClick = xpButton11Click
      end
      object xpButton12: TxpButton
        Left = 408
        Top = 168
        Width = 40
        Height = 25
        Caption = '删除'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        TabOrder = 2
        TabStop = True
        OnClick = xpButton12Click
      end
      object xpButton13: TxpButton
        Left = 374
        Top = 245
        Width = 75
        Height = 25
        Caption = '应用'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        TabOrder = 4
        TabStop = True
        OnClick = xpButton13Click
      end
    end
    object TabSheet5: TTabSheet
      Caption = '网络安全'
      ImageIndex = 4
      object GroupBox3: TGroupBox
        Left = 8
        Top = 64
        Width = 449
        Height = 89
        Caption = '身份验证'
        TabOrder = 0
        object RadioButton1: TRadioButton
          Left = 8
          Top = 16
          Width = 169
          Height = 17
          Caption = '允许任何人列我为好友'
          Checked = True
          TabOrder = 0
          TabStop = True
        end
        object RadioButton2: TRadioButton
          Left = 8
          Top = 40
          Width = 201
          Height = 17
          Caption = '需要身份验证才能将我列为好友'
          TabOrder = 1
        end
        object RadioButton3: TRadioButton
          Left = 8
          Top = 64
          Width = 209
          Height = 17
          Caption = '不允许任何人将我列为好友'
          TabOrder = 2
        end
      end
      object GroupBox7: TGroupBox
        Left = 8
        Top = 8
        Width = 449
        Height = 49
        Caption = '密码修改'
        TabOrder = 1
        object Label9: TLabel
          Left = 8
          Top = 24
          Width = 46
          Height = 13
          Caption = '旧密码:'
        end
        object Label10: TLabel
          Left = 192
          Top = 24
          Width = 46
          Height = 13
          Caption = '新密码:'
        end
        object xpButton1: TxpButton
          Left = 376
          Top = 14
          Width = 65
          Height = 25
          Caption = '确定'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          TabOrder = 2
          TabStop = True
          OnClick = xpButton1Click
        end
        object pwd1: TEdit
          Left = 56
          Top = 16
          Width = 121
          Height = 21
          PasswordChar = '*'
          TabOrder = 0
          OnKeyPress = pwd1KeyPress
        end
        object pwd2: TEdit
          Left = 240
          Top = 16
          Width = 121
          Height = 21
          PasswordChar = '*'
          TabOrder = 1
          OnKeyPress = pwd1KeyPress
        end
      end
      object xpButton16: TxpButton
        Left = 376
        Top = 244
        Width = 75
        Height = 25
        Caption = '应用'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        TabOrder = 2
        TabStop = True
        OnClick = xpButton16Click
      end
      object GroupBox8: TGroupBox
        Left = 8
        Top = 160
        Width = 449
        Height = 81
        Caption = '通讯模式'
        TabOrder = 3
        object Label11: TLabel
          Left = 24
          Top = 48
          Width = 377
          Height = 13
          Caption = '注：絮语是不需要服务器端的通讯软件。所以只能是点对点模式。'
        end
        object RadioButton6: TRadioButton
          Left = 8
          Top = 24
          Width = 113
          Height = 17
          Caption = '点对点通讯模式'
          Checked = True
          TabOrder = 0
          TabStop = True
        end
      end
    end
    object TabSheet4: TTabSheet
      Caption = '音频与视频'
      ImageIndex = 4
      object GroupBox1: TGroupBox
        Left = 8
        Top = 8
        Width = 449
        Height = 153
        Caption = '视频调节'
        TabOrder = 0
        object myvideo: TImage
          Left = 15
          Top = 20
          Width = 160
          Height = 120
          Hint = '双击进行全屏窗口切换'
          Center = True
          ParentShowHint = False
          ShowHint = True
          Stretch = True
        end
        object Label14: TLabel
          Left = 192
          Top = 21
          Width = 59
          Height = 13
          Caption = '视频设备:'
        end
        object CheckBox13: TCheckBox
          Left = 224
          Top = 83
          Width = 49
          Height = 17
          Caption = '预览'
          TabOrder = 0
          OnClick = CheckBox13Click
        end
        object BitBtn15: TxpButton
          Left = 224
          Top = 112
          Width = 73
          Height = 25
          Caption = '视频源'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          TabOrder = 1
          TabStop = True
          OnClick = BitBtn15Click
        end
        object videolist: TComboBox
          Left = 224
          Top = 48
          Width = 193
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 2
          OnChange = videolistChange
        end
      end
      object GroupBox2: TGroupBox
        Left = 8
        Top = 168
        Width = 449
        Height = 81
        Caption = '音频调节'
        TabOrder = 1
        object audioinlist: TComboBox
          Left = 16
          Top = 16
          Width = 249
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 0
          OnChange = audioinlistChange
        end
        object audiooutlist: TComboBox
          Left = 16
          Top = 48
          Width = 249
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 1
          OnChange = audiooutlistChange
        end
        object xpButton19: TxpButton
          Left = 352
          Top = 16
          Width = 73
          Height = 25
          Caption = '录音格式'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          TabOrder = 2
          TabStop = True
          OnClick = xpButton19Click
        end
        object xpButton20: TxpButton
          Left = 352
          Top = 48
          Width = 73
          Height = 25
          Caption = '回放格式'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          TabOrder = 3
          TabStop = True
          OnClick = xpButton20Click
        end
      end
    end
  end
end