Маленькая аська :) https://rnq.ru
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 

1459 lines
36 KiB

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