You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1460 lines
36 KiB
Plaintext
1460 lines
36 KiB
Plaintext
object viewinfoFrm: TviewinfoFrm
|
|
Left = 319
|
|
Top = 182
|
|
BorderIcons = [biSystemMenu, biMinimize]
|
|
BorderStyle = bsSingle
|
|
Caption = 'view info'
|
|
ClientHeight = 456
|
|
ClientWidth = 432
|
|
Color = clBtnFace
|
|
ParentFont = True
|
|
KeyPreview = True
|
|
OldCreateOrder = True
|
|
Position = poScreenCenter
|
|
OnClose = FormClose
|
|
OnCreate = FormCreate
|
|
OnKeyPress = FormKeyPress
|
|
OnPaint = FormPaint
|
|
OnShow = FormShow
|
|
DesignSize = (
|
|
432
|
|
456)
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object pagectrl: TPageControl
|
|
Left = 0
|
|
Top = 33
|
|
Width = 436
|
|
Height = 425
|
|
ActivePage = mainSheet
|
|
Anchors = [akLeft, akTop, akRight, akBottom]
|
|
TabOrder = 0
|
|
OnChange = pagectrlChange
|
|
object mainSheet: TTabSheet
|
|
Caption = '&Main'
|
|
ExplicitLeft = 0
|
|
ExplicitTop = 0
|
|
ExplicitWidth = 0
|
|
ExplicitHeight = 0
|
|
object Label7: TLabel
|
|
Left = 3
|
|
Top = 273
|
|
Width = 29
|
|
Height = 13
|
|
Caption = 'About'
|
|
Transparent = True
|
|
Visible = False
|
|
end
|
|
object Label8: TLabel
|
|
Left = 226
|
|
Top = 91
|
|
Width = 51
|
|
Height = 13
|
|
Alignment = taRightJustify
|
|
Caption = 'IP address'
|
|
Transparent = True
|
|
end
|
|
object Label2: TLabel
|
|
Left = 35
|
|
Top = 91
|
|
Width = 35
|
|
Height = 13
|
|
Alignment = taRightJustify
|
|
Caption = 'Gender'
|
|
Transparent = True
|
|
end
|
|
object Label13: TLabel
|
|
Left = 221
|
|
Top = 144
|
|
Width = 56
|
|
Height = 13
|
|
Alignment = taRightJustify
|
|
Caption = 'Language 1'
|
|
Transparent = True
|
|
end
|
|
object Label17: TLabel
|
|
Left = 221
|
|
Top = 170
|
|
Width = 56
|
|
Height = 13
|
|
Alignment = taRightJustify
|
|
Caption = 'Language 2'
|
|
Transparent = True
|
|
end
|
|
object Label18: TLabel
|
|
Left = 221
|
|
Top = 195
|
|
Width = 56
|
|
Height = 13
|
|
Alignment = taRightJustify
|
|
Caption = 'Language 3'
|
|
Transparent = True
|
|
end
|
|
object Label20: TLabel
|
|
Left = 122
|
|
Top = 225
|
|
Width = 21
|
|
Height = 13
|
|
Alignment = taRightJustify
|
|
Caption = 'GMT'
|
|
Transparent = True
|
|
end
|
|
object mailBtn: TRnQSpeedButton
|
|
Left = 189
|
|
Top = 62
|
|
Width = 20
|
|
Height = 21
|
|
Hint = 'Send an e-mail'
|
|
Flat = True
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
OnClick = mailBtnClick
|
|
end
|
|
object birthageLbl: TLabel
|
|
Left = 50
|
|
Top = 143
|
|
Width = 19
|
|
Height = 13
|
|
Alignment = taRightJustify
|
|
Caption = 'Age'
|
|
Transparent = True
|
|
end
|
|
object XstatusBtn: TRnQSpeedButton
|
|
Left = 396
|
|
Top = 247
|
|
Width = 21
|
|
Height = 21
|
|
Hint = 'Read XStatus'
|
|
Flat = True
|
|
OnClick = XstatusBtnClick
|
|
end
|
|
object StatusBtn: TRnQSpeedButton
|
|
Left = 396
|
|
Top = 114
|
|
Width = 20
|
|
Height = 21
|
|
Hint = 'Status'
|
|
Flat = True
|
|
OnClick = StatusBtnClick
|
|
end
|
|
object Label3: TLabel
|
|
Left = -1
|
|
Top = 113
|
|
Width = 71
|
|
Height = 21
|
|
Alignment = taRightJustify
|
|
AutoSize = False
|
|
Caption = 'Marital status'
|
|
Layout = tlCenter
|
|
end
|
|
object ageSpin: TLabel
|
|
Left = 166
|
|
Top = 170
|
|
Width = 46
|
|
Height = 13
|
|
AutoSize = False
|
|
Transparent = True
|
|
end
|
|
object aboutBox: TMemo
|
|
AlignWithMargins = True
|
|
Left = 3
|
|
Top = 292
|
|
Width = 420
|
|
Height = 100
|
|
Margins.Right = 5
|
|
Margins.Bottom = 5
|
|
Align = alBottom
|
|
MaxLength = 480
|
|
ScrollBars = ssVertical
|
|
TabOrder = 21
|
|
end
|
|
object ipBox: TEdit
|
|
Left = 283
|
|
Top = 88
|
|
Width = 133
|
|
Height = 21
|
|
TabStop = False
|
|
AutoSize = False
|
|
Color = clBtnFace
|
|
ReadOnly = True
|
|
TabOrder = 7
|
|
Text = '000.000.000.000'
|
|
end
|
|
object genderBox: TComboBox
|
|
Left = 76
|
|
Top = 88
|
|
Width = 133
|
|
Height = 21
|
|
Style = csDropDownList
|
|
TabOrder = 6
|
|
end
|
|
object lang1Box: TComboBox
|
|
Left = 283
|
|
Top = 140
|
|
Width = 133
|
|
Height = 21
|
|
Style = csDropDownList
|
|
Sorted = True
|
|
TabOrder = 11
|
|
end
|
|
object lang2Box: TComboBox
|
|
Left = 283
|
|
Top = 166
|
|
Width = 133
|
|
Height = 21
|
|
Style = csDropDownList
|
|
Sorted = True
|
|
TabOrder = 12
|
|
end
|
|
object lang3Box: TComboBox
|
|
Left = 283
|
|
Top = 192
|
|
Width = 133
|
|
Height = 21
|
|
Style = csDropDownList
|
|
Sorted = True
|
|
TabOrder = 13
|
|
end
|
|
object smsChk: TCheckBox
|
|
Left = 219
|
|
Top = 222
|
|
Width = 190
|
|
Height = 17
|
|
Caption = 'SMS-able'
|
|
Enabled = False
|
|
TabOrder = 19
|
|
end
|
|
object nickBox: TLabeledEdit
|
|
Left = 283
|
|
Top = 11
|
|
Width = 133
|
|
Height = 21
|
|
EditLabel.Width = 19
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Nick'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 1
|
|
end
|
|
object lastBox: TLabeledEdit
|
|
Left = 283
|
|
Top = 36
|
|
Width = 133
|
|
Height = 21
|
|
EditLabel.Width = 49
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Last name'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 3
|
|
end
|
|
object firstBox: TLabeledEdit
|
|
Left = 76
|
|
Top = 36
|
|
Width = 133
|
|
Height = 21
|
|
EditLabel.Width = 50
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'First name'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 2
|
|
end
|
|
object emailBox: TLabeledEdit
|
|
Left = 76
|
|
Top = 62
|
|
Width = 110
|
|
Height = 21
|
|
Color = clBtnFace
|
|
EditLabel.Width = 28
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'E-mail'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 4
|
|
end
|
|
object displayBox: TLabeledEdit
|
|
Left = 76
|
|
Top = 11
|
|
Width = 133
|
|
Height = 21
|
|
EditLabel.Width = 46
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Displayed'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
end
|
|
object uinBox: TLabeledEdit
|
|
Left = 283
|
|
Top = 62
|
|
Width = 133
|
|
Height = 21
|
|
Color = clBtnFace
|
|
EditLabel.Width = 18
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'UIN'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 5
|
|
end
|
|
object statusBox: TLabeledEdit
|
|
Left = 283
|
|
Top = 114
|
|
Width = 110
|
|
Height = 21
|
|
Color = clBtnFace
|
|
EditLabel.Width = 31
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Status'
|
|
EditLabel.OnDblClick = statusBoxSubLabelDblClick
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 9
|
|
end
|
|
object timeBox: TLabeledEdit
|
|
Left = 76
|
|
Top = 221
|
|
Width = 38
|
|
Height = 21
|
|
Color = clBtnFace
|
|
EditLabel.Width = 37
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'His time'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 17
|
|
end
|
|
object birthBox: TDateTimePicker
|
|
Left = 76
|
|
Top = 166
|
|
Width = 82
|
|
Height = 22
|
|
Date = 714.677962962960000000
|
|
Time = 714.677962962960000000
|
|
TabOrder = 14
|
|
OnChange = birthBoxChange
|
|
end
|
|
object birthageBox: TComboBox
|
|
Left = 76
|
|
Top = 140
|
|
Width = 133
|
|
Height = 21
|
|
Style = csDropDownList
|
|
TabOrder = 10
|
|
OnChange = birthageBoxChange
|
|
Items.Strings = (
|
|
'Not specified'
|
|
'Birthday')
|
|
end
|
|
object xstatusBox: TLabeledEdit
|
|
Left = 76
|
|
Top = 247
|
|
Width = 317
|
|
Height = 21
|
|
Color = clBtnFace
|
|
EditLabel.Width = 37
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'XStatus'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 20
|
|
end
|
|
object BirthLBox: TDateTimePicker
|
|
Left = 76
|
|
Top = 194
|
|
Width = 82
|
|
Height = 22
|
|
Date = 38421.000000000000000000
|
|
Format = 'dd.MM.yyyy'
|
|
Time = 38421.000000000000000000
|
|
TabOrder = 15
|
|
OnChange = birthBoxChange
|
|
end
|
|
object BirthLChk: TCheckBox
|
|
Left = 166
|
|
Top = 197
|
|
Width = 14
|
|
Height = 17
|
|
Alignment = taLeftJustify
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 16
|
|
OnClick = BirthLChkClick
|
|
OnKeyPress = BirthLChkKeyPress
|
|
end
|
|
object gmtBox: TComboBox
|
|
Left = 149
|
|
Top = 221
|
|
Width = 60
|
|
Height = 21
|
|
Style = csDropDownList
|
|
TabOrder = 18
|
|
end
|
|
object MarStsBox: TComboBox
|
|
Left = 76
|
|
Top = 114
|
|
Width = 133
|
|
Height = 21
|
|
Style = csDropDownList
|
|
TabOrder = 8
|
|
end
|
|
end
|
|
object TabSheet3: TTabSheet
|
|
Caption = '&Home'
|
|
ImageIndex = 7
|
|
object Label14: TLabel
|
|
Left = 32
|
|
Top = 143
|
|
Width = 39
|
|
Height = 13
|
|
Alignment = taRightJustify
|
|
Caption = 'Country'
|
|
Transparent = True
|
|
end
|
|
object goBtn: TRnQButton
|
|
Left = 327
|
|
Top = 22
|
|
Width = 91
|
|
Height = 23
|
|
Hint = 'Open this address'
|
|
Caption = 'GO'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 1
|
|
OnClick = goBtnClick
|
|
end
|
|
object homepageBox: TLabeledEdit
|
|
Left = 8
|
|
Top = 23
|
|
Width = 313
|
|
Height = 21
|
|
Ctl3D = True
|
|
EditLabel.Width = 51
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Homepage'
|
|
ParentCtl3D = False
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
end
|
|
object countryBox: TComboBox
|
|
Left = 77
|
|
Top = 139
|
|
Width = 140
|
|
Height = 21
|
|
Style = csDropDownList
|
|
Sorted = True
|
|
TabOrder = 5
|
|
end
|
|
object cityBox: TLabeledEdit
|
|
Left = 77
|
|
Top = 85
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 19
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'City'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 3
|
|
end
|
|
object stateBox: TLabeledEdit
|
|
Left = 77
|
|
Top = 112
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 26
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'State'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 4
|
|
end
|
|
object cellularBox: TLabeledEdit
|
|
Left = 77
|
|
Top = 193
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 35
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Cellular'
|
|
EditLabel.Font.Charset = DEFAULT_CHARSET
|
|
EditLabel.Font.Color = 9079434
|
|
EditLabel.Font.Height = -11
|
|
EditLabel.Font.Name = 'Tahoma'
|
|
EditLabel.Font.Style = []
|
|
EditLabel.ParentFont = False
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 7
|
|
end
|
|
object zipBox: TLabeledEdit
|
|
Left = 77
|
|
Top = 166
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 14
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Zip'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 6
|
|
end
|
|
object GroupBox1: TGroupBox
|
|
Left = 8
|
|
Top = 269
|
|
Width = 410
|
|
Height = 119
|
|
Caption = 'Place of birth'
|
|
TabOrder = 9
|
|
object Label5: TLabel
|
|
Left = 24
|
|
Top = 83
|
|
Width = 39
|
|
Height = 13
|
|
Alignment = taRightJustify
|
|
Caption = 'Country'
|
|
Transparent = True
|
|
end
|
|
object birthCityBox: TLabeledEdit
|
|
Left = 69
|
|
Top = 26
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 19
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'City'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
end
|
|
object birthStateBox: TLabeledEdit
|
|
Left = 69
|
|
Top = 53
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 26
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'State'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 1
|
|
end
|
|
object birthCountryBox: TComboBox
|
|
Left = 69
|
|
Top = 80
|
|
Width = 140
|
|
Height = 21
|
|
Style = csDropDownList
|
|
Sorted = True
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
object addressBox: TLabeledEdit
|
|
Left = 77
|
|
Top = 58
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 39
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Address'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 2
|
|
end
|
|
object regularBox: TLabeledEdit
|
|
Left = 77
|
|
Top = 220
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 30
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Phone'
|
|
EditLabel.Font.Charset = DEFAULT_CHARSET
|
|
EditLabel.Font.Color = 9079434
|
|
EditLabel.Font.Height = -11
|
|
EditLabel.Font.Name = 'Tahoma'
|
|
EditLabel.Font.Style = []
|
|
EditLabel.ParentFont = False
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 8
|
|
end
|
|
object verifyPhone: TRnQButton
|
|
Left = 248
|
|
Top = 220
|
|
Width = 170
|
|
Height = 21
|
|
Caption = 'Add verified number'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 10
|
|
OnClick = verifyPhoneClick
|
|
end
|
|
end
|
|
object WorkTS: TTabSheet
|
|
Caption = '&Work'
|
|
ImageIndex = 6
|
|
object Label1: TLabel
|
|
Left = 32
|
|
Top = 220
|
|
Width = 39
|
|
Height = 13
|
|
Alignment = taRightJustify
|
|
Caption = 'Country'
|
|
Transparent = True
|
|
end
|
|
object WkpgEdt: TLabeledEdit
|
|
Left = 8
|
|
Top = 23
|
|
Width = 313
|
|
Height = 21
|
|
EditLabel.Width = 49
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Workpage'
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
end
|
|
object workCityEdt: TLabeledEdit
|
|
Left = 77
|
|
Top = 165
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 19
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'City'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 6
|
|
end
|
|
object workStateEdt: TLabeledEdit
|
|
Left = 77
|
|
Top = 192
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 26
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'State'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 7
|
|
end
|
|
object WorkCntryBox: TComboBox
|
|
Left = 77
|
|
Top = 219
|
|
Width = 140
|
|
Height = 21
|
|
Style = csDropDownList
|
|
Sorted = True
|
|
TabOrder = 8
|
|
end
|
|
object workZipEdt: TLabeledEdit
|
|
Left = 77
|
|
Top = 246
|
|
Width = 140
|
|
Height = 21
|
|
CharCase = ecLowerCase
|
|
EditLabel.Width = 14
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Zip'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
MaxLength = 9
|
|
ReadOnly = True
|
|
TabOrder = 9
|
|
OnChange = OnlyDigitChange
|
|
end
|
|
object WorkCellEdit: TLabeledEdit
|
|
Left = 77
|
|
Top = 273
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 30
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Phone'
|
|
EditLabel.Font.Charset = DEFAULT_CHARSET
|
|
EditLabel.Font.Color = 9079434
|
|
EditLabel.Font.Height = -11
|
|
EditLabel.Font.Name = 'Tahoma'
|
|
EditLabel.Font.Style = []
|
|
EditLabel.ParentFont = False
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 10
|
|
end
|
|
object WorkPosEdit: TLabeledEdit
|
|
Left = 77
|
|
Top = 58
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 37
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Position'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 2
|
|
end
|
|
object WorkDeptEdit: TLabeledEdit
|
|
Left = 77
|
|
Top = 85
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 57
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Department'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 3
|
|
end
|
|
object WorkCompanyEdit: TLabeledEdit
|
|
Left = 77
|
|
Top = 112
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 45
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Company'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 4
|
|
end
|
|
object GoWkPgBtn: TRnQButton
|
|
Left = 327
|
|
Top = 22
|
|
Width = 91
|
|
Height = 23
|
|
Hint = 'Open this address'
|
|
Caption = 'GO'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 1
|
|
OnClick = GoWkPgBtnClick
|
|
end
|
|
object StsMsgEdit: TLabeledEdit
|
|
Left = 8
|
|
Top = 338
|
|
Width = 313
|
|
Height = 21
|
|
EditLabel.Width = 50
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Life status'
|
|
TabOrder = 11
|
|
end
|
|
object RnQButton2: TRnQButton
|
|
Left = 327
|
|
Top = 337
|
|
Width = 91
|
|
Height = 23
|
|
Caption = 'Apply'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 12
|
|
OnClick = RnQButton2Click
|
|
ImageName = 'apply'
|
|
end
|
|
object workAddressEdt: TLabeledEdit
|
|
Left = 77
|
|
Top = 139
|
|
Width = 140
|
|
Height = 21
|
|
EditLabel.Width = 39
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Address'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 5
|
|
end
|
|
object verifyPhone2: TRnQButton
|
|
Left = 248
|
|
Top = 272
|
|
Width = 170
|
|
Height = 23
|
|
Caption = 'Add verified number'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 13
|
|
OnClick = verifyPhoneClick
|
|
end
|
|
end
|
|
object TabSheet2: TTabSheet
|
|
Caption = '&Extra'
|
|
object Bevel2: TBevel
|
|
Left = 246
|
|
Top = 172
|
|
Width = 2
|
|
Height = 210
|
|
end
|
|
object Label28: TLabel
|
|
Left = 258
|
|
Top = 223
|
|
Width = 40
|
|
Height = 13
|
|
Caption = 'UIN-lists'
|
|
end
|
|
object dontdeleteChk: TCheckBox
|
|
Left = 14
|
|
Top = 345
|
|
Width = 219
|
|
Height = 17
|
|
Caption = 'Don'#39't delete from database'
|
|
TabOrder = 7
|
|
end
|
|
object uinlistsBox: TMemo
|
|
Left = 258
|
|
Top = 242
|
|
Width = 144
|
|
Height = 122
|
|
Color = clBtnFace
|
|
ReadOnly = True
|
|
ScrollBars = ssVertical
|
|
TabOrder = 10
|
|
end
|
|
object groupBox: TLabeledEdit
|
|
Left = 258
|
|
Top = 186
|
|
Width = 144
|
|
Height = 21
|
|
Color = clBtnFace
|
|
EditLabel.Width = 29
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Group'
|
|
ReadOnly = True
|
|
TabOrder = 9
|
|
end
|
|
object publicChk: TCheckBox
|
|
Left = 14
|
|
Top = 366
|
|
Width = 219
|
|
Height = 17
|
|
Caption = 'Let people see my e-mail address'
|
|
TabOrder = 8
|
|
end
|
|
object GroupBox9: TGroupBox
|
|
Left = 8
|
|
Top = 11
|
|
Width = 410
|
|
Height = 140
|
|
Caption = 'Interests'
|
|
TabOrder = 0
|
|
object Inter1Box: TComboBox
|
|
Left = 15
|
|
Top = 26
|
|
Width = 140
|
|
Height = 21
|
|
Style = csDropDownList
|
|
Sorted = True
|
|
TabOrder = 0
|
|
end
|
|
object Inter2Box: TComboBox
|
|
Left = 15
|
|
Top = 52
|
|
Width = 140
|
|
Height = 21
|
|
Style = csDropDownList
|
|
Sorted = True
|
|
TabOrder = 2
|
|
end
|
|
object Inter3Box: TComboBox
|
|
Left = 15
|
|
Top = 78
|
|
Width = 140
|
|
Height = 21
|
|
Style = csDropDownList
|
|
Sorted = True
|
|
TabOrder = 4
|
|
end
|
|
object Inter1: TEdit
|
|
Left = 167
|
|
Top = 26
|
|
Width = 227
|
|
Height = 21
|
|
TabOrder = 1
|
|
end
|
|
object Inter2: TEdit
|
|
Left = 167
|
|
Top = 52
|
|
Width = 227
|
|
Height = 21
|
|
TabOrder = 3
|
|
end
|
|
object Inter3: TEdit
|
|
Left = 167
|
|
Top = 78
|
|
Width = 227
|
|
Height = 21
|
|
TabOrder = 5
|
|
end
|
|
object Inter4Box: TComboBox
|
|
Left = 15
|
|
Top = 104
|
|
Width = 140
|
|
Height = 21
|
|
Style = csDropDownList
|
|
Sorted = True
|
|
TabOrder = 6
|
|
end
|
|
object Inter4: TEdit
|
|
Left = 167
|
|
Top = 104
|
|
Width = 227
|
|
Height = 21
|
|
TabOrder = 7
|
|
end
|
|
end
|
|
object lastupdateBox: TLabeledEdit
|
|
Left = 130
|
|
Top = 306
|
|
Width = 105
|
|
Height = 21
|
|
Color = clBtnFace
|
|
EditLabel.Width = 78
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Last info update'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 5
|
|
end
|
|
object membersinceBox: TLabeledEdit
|
|
Left = 130
|
|
Top = 253
|
|
Width = 105
|
|
Height = 21
|
|
Color = clBtnFace
|
|
EditLabel.Width = 67
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Registered on'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 4
|
|
end
|
|
object onlinesinceBox: TLabeledEdit
|
|
Left = 130
|
|
Top = 226
|
|
Width = 105
|
|
Height = 21
|
|
Color = clBtnFace
|
|
EditLabel.Width = 57
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Online since'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 3
|
|
end
|
|
object lastonlineBox: TLabeledEdit
|
|
Left = 130
|
|
Top = 199
|
|
Width = 105
|
|
Height = 21
|
|
Color = clBtnFace
|
|
EditLabel.Width = 100
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Last time seen online'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 2
|
|
end
|
|
object lastmsgBox: TLabeledEdit
|
|
Left = 130
|
|
Top = 172
|
|
Width = 105
|
|
Height = 21
|
|
Color = clBtnFace
|
|
EditLabel.Width = 88
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Last message time'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 1
|
|
end
|
|
object LastChgInfoBox: TLabeledEdit
|
|
Left = 130
|
|
Top = 280
|
|
Width = 105
|
|
Height = 21
|
|
Color = clBtnFace
|
|
EditLabel.Width = 64
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Info changed'
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
ReadOnly = True
|
|
TabOrder = 6
|
|
end
|
|
end
|
|
object InterSheet: TTabSheet
|
|
Caption = '&Client'
|
|
ImageIndex = 3
|
|
object Label26: TLabel
|
|
Left = 16
|
|
Top = 319
|
|
Width = 70
|
|
Height = 13
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption = 'IP address'
|
|
end
|
|
object resolveBtn: TRnQSpeedButton
|
|
Left = 16
|
|
Top = 340
|
|
Width = 70
|
|
Height = 20
|
|
Caption = 'Resolve'
|
|
Flat = True
|
|
OnClick = resolveBtnClick
|
|
end
|
|
object copyBtn: TRnQSpeedButton
|
|
Left = 16
|
|
Top = 367
|
|
Width = 70
|
|
Height = 20
|
|
Caption = 'Copy'
|
|
Flat = True
|
|
OnClick = copyBtnClick
|
|
end
|
|
object Bevel3: TBevel
|
|
Left = 184
|
|
Top = 19
|
|
Width = 3
|
|
Height = 74
|
|
end
|
|
object CapsLabel: TLabel
|
|
Left = 8
|
|
Top = 84
|
|
Width = 82
|
|
Height = 13
|
|
Caption = 'Client capabilities'
|
|
end
|
|
object ipbox2: TMemo
|
|
Left = 96
|
|
Top = 322
|
|
Width = 322
|
|
Height = 66
|
|
ReadOnly = True
|
|
ScrollBars = ssVertical
|
|
TabOrder = 7
|
|
end
|
|
object ChkSendTransl: TCheckBox
|
|
Left = 192
|
|
Top = 21
|
|
Width = 261
|
|
Height = 17
|
|
Caption = 'Send translit message (for russian only)'
|
|
TabOrder = 2
|
|
end
|
|
object protoBox: TLabeledEdit
|
|
Left = 80
|
|
Top = 19
|
|
Width = 97
|
|
Height = 21
|
|
EditLabel.Width = 70
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Direct protocol'
|
|
LabelPosition = lpLeft
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
end
|
|
object clientBox: TLabeledEdit
|
|
Left = 80
|
|
Top = 46
|
|
Width = 97
|
|
Height = 21
|
|
EditLabel.Width = 27
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Client'
|
|
LabelPosition = lpLeft
|
|
ReadOnly = True
|
|
TabOrder = 1
|
|
end
|
|
object CliCapsMemo: TMemo
|
|
Left = 8
|
|
Top = 101
|
|
Width = 410
|
|
Height = 203
|
|
ReadOnly = True
|
|
TabOrder = 6
|
|
WordWrap = False
|
|
end
|
|
object loginMailEdt: TLabeledEdit
|
|
Left = 192
|
|
Top = 72
|
|
Width = 226
|
|
Height = 21
|
|
EditLabel.Width = 107
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Attached mail for login'
|
|
TabOrder = 5
|
|
end
|
|
object LUPDDATEEdt: TEdit
|
|
Left = 192
|
|
Top = 46
|
|
Width = 105
|
|
Height = 21
|
|
ReadOnly = True
|
|
TabOrder = 3
|
|
end
|
|
object LInfoDATEEdt: TEdit
|
|
Left = 303
|
|
Top = 46
|
|
Width = 115
|
|
Height = 21
|
|
ReadOnly = True
|
|
TabOrder = 4
|
|
end
|
|
end
|
|
object TabSheet1: TTabSheet
|
|
Caption = '&Notes'
|
|
ImageIndex = 2
|
|
object notesBox: TMemo
|
|
AlignWithMargins = True
|
|
Left = 3
|
|
Top = 224
|
|
Width = 420
|
|
Height = 168
|
|
Margins.Right = 5
|
|
Margins.Bottom = 5
|
|
Align = alBottom
|
|
ScrollBars = ssVertical
|
|
TabOrder = 2
|
|
end
|
|
object ssNotesGrp: TGroupBox
|
|
Left = 8
|
|
Top = 11
|
|
Width = 410
|
|
Height = 167
|
|
Caption = 'Server side'
|
|
TabOrder = 0
|
|
object ssNoteStrEdit: TLabeledEdit
|
|
Left = 100
|
|
Top = 26
|
|
Width = 294
|
|
Height = 21
|
|
EditLabel.Width = 48
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Important'
|
|
EditLabel.Layout = tlCenter
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
TabOrder = 0
|
|
end
|
|
object localMailEdt: TLabeledEdit
|
|
Left = 100
|
|
Top = 53
|
|
Width = 294
|
|
Height = 21
|
|
EditLabel.Width = 28
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'E-Mail'
|
|
EditLabel.Layout = tlCenter
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
TabOrder = 1
|
|
end
|
|
object CellularEdt: TLabeledEdit
|
|
Left = 100
|
|
Top = 80
|
|
Width = 214
|
|
Height = 21
|
|
EditLabel.Width = 66
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Cellular (SMS)'
|
|
EditLabel.Layout = tlCenter
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
TabOrder = 2
|
|
end
|
|
object ApplyMyTextBtn: TRnQButton
|
|
Left = 318
|
|
Top = 79
|
|
Width = 77
|
|
Height = 77
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 3
|
|
OnClick = ApplyMyTextBtnClick
|
|
ImageName = 'apply'
|
|
end
|
|
object CellularEdt2: TLabeledEdit
|
|
Left = 100
|
|
Top = 107
|
|
Width = 214
|
|
Height = 21
|
|
EditLabel.Width = 44
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Cellular 2'
|
|
EditLabel.Layout = tlCenter
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
TabOrder = 4
|
|
end
|
|
object CellularEdt3: TLabeledEdit
|
|
Left = 100
|
|
Top = 134
|
|
Width = 214
|
|
Height = 21
|
|
EditLabel.Width = 44
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Cellular 3'
|
|
EditLabel.Layout = tlCenter
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
TabOrder = 5
|
|
end
|
|
end
|
|
object lclNoteStrEdit: TLabeledEdit
|
|
Left = 88
|
|
Top = 191
|
|
Width = 330
|
|
Height = 21
|
|
EditLabel.Width = 48
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Important'
|
|
EditLabel.Layout = tlCenter
|
|
LabelPosition = lpLeft
|
|
LabelSpacing = 6
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object avtTS: TTabSheet
|
|
Caption = '&Avatar'
|
|
ImageIndex = 4
|
|
OnShow = avtTSShow
|
|
DesignSize = (
|
|
428
|
|
397)
|
|
object AVTGrp: TGroupBox
|
|
Left = 97
|
|
Top = 11
|
|
Width = 317
|
|
Height = 159
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'Avatar'
|
|
TabOrder = 1
|
|
object AvtPBox: TPaintBox
|
|
Left = 11
|
|
Top = 20
|
|
Width = 142
|
|
Height = 128
|
|
OnPaint = AvtPBoxPaint
|
|
end
|
|
object ClrAvtLbl: TLabel
|
|
Left = 168
|
|
Top = 45
|
|
Width = 138
|
|
Height = 13
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption = 'Requires restart'
|
|
end
|
|
object ClrAvtBtn: TRnQButton
|
|
Left = 168
|
|
Top = 20
|
|
Width = 138
|
|
Height = 25
|
|
Caption = 'Clear avatar'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 0
|
|
OnClick = ClrAvtBtnClick
|
|
ImageName = 'clear'
|
|
end
|
|
object avtSaveBtn: TRnQButton
|
|
Left = 168
|
|
Top = 70
|
|
Width = 138
|
|
Height = 25
|
|
Caption = 'Change own avatar'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 1
|
|
OnClick = avtSaveBtnClick
|
|
ImageName = 'save.net'
|
|
end
|
|
object avtLoadBtn: TRnQButton
|
|
Left = 168
|
|
Top = 112
|
|
Width = 138
|
|
Height = 25
|
|
Caption = 'Load avatar'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 2
|
|
OnClick = avtLoadBtnClick
|
|
ImageName = 'load.net'
|
|
end
|
|
end
|
|
object IcShRGrp: TRadioGroup
|
|
Left = 8
|
|
Top = 11
|
|
Width = 79
|
|
Height = 159
|
|
Caption = 'Show'
|
|
ItemIndex = 0
|
|
Items.Strings = (
|
|
'Avatar'
|
|
'Photo'
|
|
'None')
|
|
TabOrder = 0
|
|
end
|
|
object PhtGrp: TGroupBox
|
|
Left = 8
|
|
Top = 184
|
|
Width = 406
|
|
Height = 206
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'Photo'
|
|
TabOrder = 2
|
|
object PhotoPBox: TPaintBox
|
|
Left = 11
|
|
Top = 20
|
|
Width = 231
|
|
Height = 174
|
|
OnPaint = PhotoPBoxPaint
|
|
end
|
|
object PhtLoadBtn: TRnQButton
|
|
Left = 257
|
|
Top = 19
|
|
Width = 138
|
|
Height = 25
|
|
Caption = 'Load thumb'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 0
|
|
OnClick = PhtLoadBtnClick
|
|
ImageName = 'load.net'
|
|
end
|
|
object PhtBigLoadBtn: TRnQButton
|
|
Left = 257
|
|
Top = 56
|
|
Width = 138
|
|
Height = 25
|
|
Caption = 'Load photo'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 1
|
|
OnClick = PhtBigLoadBtnClick
|
|
ImageName = 'load.net'
|
|
end
|
|
object PhtLoadBtn2: TRnQButton
|
|
Left = 257
|
|
Top = 95
|
|
Width = 138
|
|
Height = 25
|
|
Caption = 'Load photo 2'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 2
|
|
Visible = False
|
|
OnClick = PhtLoadBtn2Click
|
|
ImageName = 'load.net'
|
|
end
|
|
object PhtLoadBtn3: TRnQButton
|
|
Left = 257
|
|
Top = 134
|
|
Width = 138
|
|
Height = 25
|
|
Caption = 'Load photo 3'
|
|
DoubleBuffered = True
|
|
ParentDoubleBuffered = False
|
|
TabOrder = 3
|
|
Visible = False
|
|
OnClick = PhtLoadBtn3Click
|
|
ImageName = 'load.net'
|
|
end
|
|
end
|
|
end
|
|
object PrivacyTab: TTabSheet
|
|
Caption = 'Privacy'
|
|
ImageIndex = 6
|
|
object Label4: TLabel
|
|
Left = 35
|
|
Top = 32
|
|
Width = 31
|
|
Height = 13
|
|
Caption = 'Label4'
|
|
end
|
|
object FontSelectBtn: TRnQSpeedButton
|
|
Left = 154
|
|
Top = 31
|
|
Width = 23
|
|
Height = 22
|
|
ImageName = 'font'
|
|
end
|
|
end
|
|
end
|
|
object topPnl: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 432
|
|
Height = 33
|
|
Align = alTop
|
|
BevelOuter = bvNone
|
|
TabOrder = 1
|
|
object deleteBtn: TRnQSpeedButton
|
|
Left = 276
|
|
Top = 5
|
|
Width = 102
|
|
Height = 25
|
|
Caption = 'delete from list'
|
|
Flat = True
|
|
OnClick = deleteBtnClick
|
|
end
|
|
object saveBtn: TRnQSpeedButton
|
|
Left = 168
|
|
Top = 5
|
|
Width = 102
|
|
Height = 25
|
|
Caption = 'save my info'
|
|
Flat = True
|
|
OnClick = saveBtnClick
|
|
end
|
|
object updateBtn: TRnQSpeedButton
|
|
Left = 60
|
|
Top = 5
|
|
Width = 102
|
|
Height = 25
|
|
Caption = 'retrieve info'
|
|
Flat = True
|
|
OnClick = updateBtnClick
|
|
end
|
|
end
|
|
end
|