home *** CD-ROM | disk | FTP | other *** search
Text File | 2007-01-01 | 73.1 KB | 2,667 lines |
- object PrefForm: TPrefForm
- Left = 270
- Top = 175
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsSingle
- Caption = 'Options / Preferences'
- ClientHeight = 425
- ClientWidth = 549
- Color = clBtnFace
- DefaultMonitor = dmMainForm
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- KeyPreview = True
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnKeyDown = FormKeyDown
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object PCopt: TPageControlEx
- Left = 153
- Top = 0
- Width = 396
- Height = 386
- ActivePage = TabHistory
- Align = alClient
- HotTrack = True
- TabOrder = 1
- OnChange = PCoptChange
- object TabGeneral: TTabSheet
- Caption = 'General'
- object GroupBoxCLAuth: TGroupBox
- Left = 12
- Top = 5
- Width = 370
- Height = 93
- Caption = ' Contact List Authorization / Web Aware'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object RBGenAuthReq: TRadioButton
- Left = 14
- Top = 18
- Width = 351
- Height = 20
- Caption = 'My Authorization is Required (Authorize)'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object RBGenAlways: TRadioButton
- Left = 14
- Top = 39
- Width = 351
- Height = 20
- Caption = 'All Users may Add me without Authorization (Always)'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- object CheckBoxGenAware: TCheckBox
- Left = 14
- Top = 62
- Width = 336
- Height = 20
- Caption = 'Allow others to see my Status in Search and from the Web'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- end
- end
- object GroupBoxGenOpts: TGroupBox
- Left = 12
- Top = 104
- Width = 370
- Height = 249
- Caption = ' Options '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- object LabelX: TLabel
- Left = 83
- Top = 223
- Width = 5
- Height = 13
- Caption = 'x'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label1: TLabel
- Left = 128
- Top = 223
- Width = 3
- Height = 13
- Caption = ':'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object LabelListenPorts: TLabel
- Left = 53
- Top = 158
- Width = 204
- Height = 13
- Caption = 'Listen on the one of following ports (max.7):'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object CheckBoxGenBuddyIcon: TCheckBox
- Left = 15
- Top = 75
- Width = 349
- Height = 20
- Caption = 'Disable Buddy Icon Service'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- end
- object CheckBoxGenReconnect: TCheckBox
- Left = 15
- Top = 55
- Width = 349
- Height = 20
- Caption = 'Reconnect upon disconnection'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- end
- object CheckBoxGenDontDash: TCheckBox
- Left = 15
- Top = 36
- Width = 349
- Height = 20
- Caption = 'Show Accounts without dash (qip restart needed)'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- object CheckBoxGenNewVer: TCheckBox
- Left = 15
- Top = 94
- Width = 349
- Height = 20
- Caption = 'Check for new version after login'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- end
- object CheckBoxGenServSize: TCheckBox
- Left = 15
- Top = 199
- Width = 349
- Height = 20
- Caption = 'Service Messages window (width x height : seconds):'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 8
- OnClick = CheckBoxGenServSizeClick
- end
- object EditGenSizeW: TEdit
- Left = 52
- Top = 220
- Width = 28
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 3
- ParentFont = False
- TabOrder = 9
- Text = '180'
- end
- object EditGenSizeH: TEdit
- Left = 92
- Top = 220
- Width = 28
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 3
- ParentFont = False
- TabOrder = 10
- Text = '160'
- end
- object EditGenSrvSec: TEdit
- Left = 140
- Top = 220
- Width = 23
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 2
- ParentFont = False
- TabOrder = 11
- Text = '5'
- end
- object CheckBoxGenFT: TCheckBox
- Left = 15
- Top = 139
- Width = 349
- Height = 20
- Caption = 'Enable File Transfer'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 6
- OnClick = CheckBoxGenFTClick
- end
- object EditGenPorts: TEdit
- Left = 52
- Top = 175
- Width = 256
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 7
- end
- object CheckBoxGenBR: TCheckBox
- Left = 15
- Top = 114
- Width = 349
- Height = 20
- Caption = 'Enable Birthday reminder'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- end
- object CheckBoxGenStart: TCheckBox
- Left = 15
- Top = 17
- Width = 349
- Height = 20
- Caption = 'Launch QIP on startup'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- end
- object PanelHidden: TPanel
- Left = 21
- Top = 65
- Width = 351
- Height = 24
- BevelOuter = bvLowered
- Caption =
- 'Your ICQ# has no info, to Enable options above Update your Detai' +
- 'ls'
- TabOrder = 2
- Visible = False
- end
- end
- object TabCL: TTabSheet
- Caption = 'Contact List'
- object PanelCLLastMod: TPanel
- Left = 92
- Top = 10
- Width = 290
- Height = 18
- BevelOuter = bvLowered
- TabOrder = 0
- end
- object GroupBoxCLSort: TGroupBox
- Left = 12
- Top = 32
- Width = 160
- Height = 84
- Caption = ' Sort Mode '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- object RadioButtonCLUnsorted: TRadioButton
- Left = 14
- Top = 18
- Width = 137
- Height = 20
- Caption = 'Unsorted'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object RadioButtonCLSortName: TRadioButton
- Left = 14
- Top = 57
- Width = 137
- Height = 20
- Caption = 'Sort by Name'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- end
- object RadioButtonCLSortStatus: TRadioButton
- Left = 14
- Top = 37
- Width = 137
- Height = 20
- Caption = 'Sort by Status'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- TabStop = True
- end
- end
- object GroupBoxCLOpts: TGroupBox
- Left = 12
- Top = 118
- Width = 370
- Height = 235
- Caption = ' Options '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 4
- object CheckBoxShowAdvHints: TCheckBox
- Left = 15
- Top = 37
- Width = 349
- Height = 20
- Caption = 'Show Advanced Contact Information in Hints'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- object CheckBoxCLDisableAniBalloons: TCheckBox
- Left = 15
- Top = 56
- Width = 349
- Height = 20
- Caption = 'Disable Birthday Balloons Animation'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- end
- object CheckBoxGenShortReq: TCheckBox
- Left = 15
- Top = 18
- Width = 349
- Height = 20
- Caption = 'Request Short Info for Users Not on my Contact List'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object CheckBoxCLDisQipIcon: TCheckBox
- Left = 15
- Top = 94
- Width = 349
- Height = 20
- Caption = 'Don'#39't Use qip icon for qip Users on my Contact List'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- end
- object CheckBoxCLclearNIL: TCheckBox
- Left = 15
- Top = 151
- Width = 349
- Height = 20
- Caption = 'Clear Not in List Users after qip Restart'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 7
- end
- object CheckBoxCLTaskBar: TCheckBox
- Left = 15
- Top = 170
- Width = 349
- Height = 20
- Caption = 'Show QIP button on the Task Bar'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 8
- end
- object CheckBoxCLDisCustomSt: TCheckBox
- Left = 15
- Top = 113
- Width = 349
- Height = 20
- Caption = 'Don'#39't show custom statuses of users on my Contact List'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- end
- object CheckBoxCLDisAuthReq: TCheckBox
- Left = 15
- Top = 132
- Width = 349
- Height = 20
- Caption = 'Don'#39't show "Authorization required" flags'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 6
- end
- object CheckBoxCLDocking: TCheckBox
- Left = 15
- Top = 189
- Width = 349
- Height = 20
- Caption = 'Docking'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 9
- end
- object CheckBoxCLResize: TCheckBox
- Left = 15
- Top = 209
- Width = 349
- Height = 20
- Caption = 'Resize'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 10
- end
- object CheckBoxCLHideBal: TCheckBox
- Left = 15
- Top = 75
- Width = 349
- Height = 20
- Caption = 'Hide Birthday Balloons'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- end
- end
- object GroupBoxCLTrans: TGroupBox
- Left = 181
- Top = 32
- Width = 201
- Height = 84
- Caption = ' Transparency '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 3
- object TrackBarTrans: TTrackBar
- Left = 5
- Top = 15
- Width = 188
- Height = 25
- LineSize = 5
- Max = 240
- PageSize = 5
- Frequency = 5
- TabOrder = 0
- ThumbLength = 15
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = TrackBarTransChange
- end
- object CheckBoxCLInactive: TCheckBox
- Left = 11
- Top = 42
- Width = 180
- Height = 20
- Caption = 'For Inactive Only'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- object CheckBoxCLAutoHide: TCheckBox
- Left = 11
- Top = 60
- Width = 150
- Height = 20
- Caption = 'Auto Hide (seconds) :'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- end
- object EditCLAutoSecs: TEdit
- Left = 173
- Top = 64
- Width = 20
- Height = 14
- BevelInner = bvNone
- BevelOuter = bvNone
- BorderStyle = bsNone
- Ctl3D = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 3
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 3
- Text = '60'
- end
- end
- object ButtonColors: TButton
- Left = 12
- Top = 9
- Width = 74
- Height = 20
- Caption = 'Colors'
- TabOrder = 1
- OnClick = ButtonColorsClick
- end
- end
- object TabEvents: TTabSheet
- Caption = 'Events'
- object GroupBoxEvTray: TGroupBox
- Left = 12
- Top = 72
- Width = 370
- Height = 281
- Caption = ' Tray Popup Messages '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- object LabelEnUsers: TLabel
- Left = 16
- Top = 154
- Width = 180
- Height = 13
- Caption = 'Enable Tray Notifications when Users:'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object Bevel1: TBevel
- Left = 14
- Top = 139
- Width = 341
- Height = 6
- Shape = bsBottomLine
- end
- object CheckBoxEvTrayInact: TCheckBox
- Left = 32
- Top = 77
- Width = 334
- Height = 20
- Caption = 'Show Only when Messaging Window is Inactive'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- end
- object CheckBoxEvEnableTray: TCheckBox
- Left = 16
- Top = 57
- Width = 346
- Height = 20
- Caption = 'Enable Tray Messages from Users in my Contact List'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 2
- OnClick = CheckBoxEvEnableTrayClick
- end
- object CheckBoxEvSignon: TCheckBox
- Left = 16
- Top = 172
- Width = 346
- Height = 20
- Caption = 'Sing On'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 6
- end
- object CheckBoxEvSignoff: TCheckBox
- Left = 16
- Top = 191
- Width = 346
- Height = 20
- Caption = 'Sing Off'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 7
- end
- object CheckBoxEvRetAway: TCheckBox
- Left = 16
- Top = 210
- Width = 346
- Height = 20
- Caption = 'Return from Away Statuses'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 8
- end
- object CheckBoxEvReadSt: TCheckBox
- Left = 16
- Top = 229
- Width = 346
- Height = 20
- Caption = 'Reading my Status Message'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 9
- end
- object CheckBoxEvMsgMe: TCheckBox
- Left = 16
- Top = 248
- Width = 346
- Height = 20
- Caption = 'Typing Message to me when no message window is open'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 10
- end
- object CheckBoxEvDontBlink: TCheckBox
- Left = 32
- Top = 95
- Width = 334
- Height = 20
- Caption = 'Accept messages without Blinking'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- end
- object CheckBoxEvDontShowOnAway: TCheckBox
- Left = 32
- Top = 113
- Width = 334
- Height = 20
- Caption = 'Do not show on Away Statuses'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- end
- object CheckBoxEvLeftSide: TCheckBox
- Left = 16
- Top = 38
- Width = 346
- Height = 20
- Caption = 'Popup on the left side of the screen'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = CheckBoxEvEnableTrayClick
- end
- object CheckBoxEvFSapp: TCheckBox
- Left = 16
- Top = 19
- Width = 346
- Height = 20
- Caption = 'Popup over full-screen applications'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = CheckBoxEvEnableTrayClick
- end
- end
- object GroupBoxEvBlink: TGroupBox
- Left = 12
- Top = 5
- Width = 370
- Height = 60
- Caption = ' Blink On Events '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object RadioButtonEvBlinkBtn: TRadioButton
- Left = 16
- Top = 15
- Width = 349
- Height = 20
- Caption = 'Blink Messaging Window Button in Task Bar'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- TabStop = True
- end
- object RadioButtonEvBlinkIcon: TRadioButton
- Left = 16
- Top = 34
- Width = 349
- Height = 20
- Caption = 'Blink Icon on Messaging Window Button in Task Bar'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- end
- end
- object TabMsgWin: TTabSheet
- Caption = 'Messaging Window'
- object GroupBoxMsgOpts: TGroupBox
- Left = 12
- Top = 5
- Width = 370
- Height = 348
- Caption = ' Options '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object CheckBoxMsgBgPic: TCheckBox
- Left = 16
- Top = 18
- Width = 349
- Height = 20
- Caption = 'Disable Background Picture in Messaging Window'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object CheckBoxMsgTabUins: TCheckBox
- Left = 16
- Top = 38
- Width = 349
- Height = 20
- Caption = 'Show UINs/SNs on the Messaging Window Tabs'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- object CheckBoxMsgHidePanel: TCheckBox
- Left = 16
- Top = 58
- Width = 349
- Height = 20
- Caption = 'Hide User Info / Icon Panel'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- end
- object CheckBoxMsgDisRtf: TCheckBox
- Left = 16
- Top = 138
- Width = 349
- Height = 20
- Caption = 'Disable RTF messages'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 6
- end
- object GroupBoxMsgPre: TGroupBox
- Left = 14
- Top = 205
- Width = 339
- Height = 132
- Caption = ' Predefinded Replies (one per line) '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 9
- object MemoMsgPre: TMemo
- Left = 11
- Top = 20
- Width = 316
- Height = 101
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Lines.Strings = (
- 'Hello'
- 'How are you?'
- 'Thanks, I'#39'm ok'
- 'Wait a sec'
- 'cya'
- 'bye')
- ParentFont = False
- ScrollBars = ssBoth
- TabOrder = 0
- end
- end
- object CheckBoxMsgSendPred: TCheckBox
- Left = 16
- Top = 183
- Width = 349
- Height = 20
- Caption = 'Send predefined replies immediately'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 8
- end
- object CheckBoxMsgZoom: TCheckBox
- Left = 16
- Top = 98
- Width = 349
- Height = 20
- Caption = 'Zoom in user'#39's avatar/image when mouse cursor over it'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- end
- object CheckBoxMsgDoubleEnter: TCheckBox
- Left = 16
- Top = 118
- Width = 349
- Height = 20
- Caption = 'Send message on double Enter, if send on Enter enabled'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- end
- object CheckBoxMsgHideBottom: TCheckBox
- Left = 16
- Top = 78
- Width = 349
- Height = 20
- Caption = 'Hide bottom panel'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- end
- object CheckBoxMsgDisSnd: TCheckBox
- Left = 16
- Top = 158
- Width = 349
- Height = 20
- Caption = 'Disable sound of incoming message when tab is active'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 7
- end
- end
- end
- object TabHistory: TTabSheet
- Caption = 'History'
- object GroupBoxHisSave: TGroupBox
- Left = 12
- Top = 5
- Width = 370
- Height = 145
- Caption = ' History Saving '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object LabelHisSavePath: TLabel
- Left = 15
- Top = 94
- Width = 61
- Height = 13
- Caption = 'Saving Path:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object CheckBoxHisSaveMsg: TCheckBox
- Left = 16
- Top = 20
- Width = 349
- Height = 20
- Caption = 'Save message history'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object CheckBoxHisSaveSrv: TCheckBox
- Left = 16
- Top = 67
- Width = 349
- Height = 20
- Caption = 'Save Service and Tool Messages'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- end
- object CheckBoxHisNIL: TCheckBox
- Left = 16
- Top = 43
- Width = 349
- Height = 20
- Caption = 'Save message history from users Not in my Contact List'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- object EditHisPath: TEdit
- Left = 15
- Top = 110
- Width = 298
- Height = 21
- TabStop = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ReadOnly = True
- TabOrder = 4
- end
- object BitBtnHisBrowse: TInfBitBtn
- Left = 318
- Top = 108
- Width = 25
- Height = 25
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnClick = BitBtnHisBrowseClick
- end
- end
- object GroupBoxHisRecent: TGroupBox
- Left = 12
- Top = 157
- Width = 370
- Height = 76
- Caption = ' Recent Messages '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- object LabelHisNum: TLabel
- Left = 59
- Top = 48
- Width = 148
- Height = 13
- Caption = ' - Number of messages to show'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object CheckBoxHisShowRecent: TCheckBox
- Left = 16
- Top = 20
- Width = 349
- Height = 20
- Caption = 'Show recent messages in Messaging window'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- State = cbChecked
- TabOrder = 0
- end
- object EditHisNum: TEdit
- Left = 29
- Top = 44
- Width = 26
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 2
- ParentFont = False
- TabOrder = 1
- Text = '4'
- end
- end
- object GroupBoxHisFiles: TGroupBox
- Left = 12
- Top = 242
- Width = 370
- Height = 79
- Caption = ' Saving Files '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- object LabelFilesPath: TLabel
- Left = 15
- Top = 23
- Width = 61
- Height = 13
- Caption = 'Saving Path:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object EditFilesPath: TEdit
- Left = 15
- Top = 39
- Width = 298
- Height = 21
- TabStop = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ReadOnly = True
- TabOrder = 0
- end
- object BitBtnFilesBrowse: TInfBitBtn
- Left = 318
- Top = 37
- Width = 25
- Height = 25
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = BitBtnFilesBrowseClick
- end
- end
- end
- object TabMode: TTabSheet
- Caption = 'Status Mode'
- object GroupBoxStOpts: TGroupBox
- Left = 12
- Top = 5
- Width = 370
- Height = 124
- Caption = ' Options '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object CheckBoxStRemember: TCheckBox
- Left = 11
- Top = 17
- Width = 354
- Height = 20
- Caption = 'Remember My Last Custom Picture'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object CheckBoxStAutoswitch: TCheckBox
- Left = 11
- Top = 37
- Width = 354
- Height = 20
- Caption = 'Autoswitch Privacy Status when Online Status Changed'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- object CheckBoxStAway: TCheckBox
- Left = 11
- Top = 57
- Width = 354
- Height = 20
- Caption = ' Set "Away" status after 15 minutes not using the computer'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- end
- object CheckBoxStNA: TCheckBox
- Left = 11
- Top = 77
- Width = 354
- Height = 20
- Caption = ' Set "N/A" status after 30 minutes not using the computer'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- end
- object EditStSetAway: TEdit
- Left = 27
- Top = 59
- Width = 17
- Height = 14
- BevelInner = bvNone
- BevelOuter = bvNone
- BorderStyle = bsNone
- Ctl3D = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 3
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 2
- Text = '15'
- end
- object EditStSetNA: TEdit
- Left = 27
- Top = 79
- Width = 17
- Height = 14
- BevelInner = bvNone
- BevelOuter = bvNone
- BorderStyle = bsNone
- Ctl3D = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 3
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 4
- Text = '30'
- end
- object CheckBoxStAllowIdle: TCheckBox
- Left = 11
- Top = 97
- Width = 354
- Height = 20
- Caption = 'Allow others to see how long I'#39've been idle'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 6
- end
- end
- object GroupBoxStMsg: TGroupBox
- Left = 12
- Top = 136
- Width = 370
- Height = 217
- Caption = ' Status Messages '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- object LabelStYourSt: TLabel
- Left = 10
- Top = 18
- Width = 69
- Height = 13
- Caption = 'Your Statuses:'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object LabelStMsg: TLabel
- Left = 164
- Top = 18
- Width = 154
- Height = 13
- Caption = 'Status Messages (One per Line):'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object LBst: TListBox
- Left = 10
- Top = 35
- Width = 144
- Height = 174
- Style = lbOwnerDrawFixed
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 20
- ParentFont = False
- TabOrder = 0
- OnClick = LBstClick
- OnDrawItem = LBstDrawItem
- OnMouseUp = LBstMouseUp
- end
- object MemoStMsg: TMemo
- Left = 163
- Top = 35
- Width = 197
- Height = 174
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ScrollBars = ssBoth
- TabOrder = 1
- OnClick = LBstClick
- OnKeyUp = MemoStMsgKeyUp
- end
- end
- end
- object TabAnti: TTabSheet
- Caption = 'Anti Spam / Flood'
- object LabelAntiFlood: TLabel
- Left = 12
- Top = 9
- Width = 374
- Height = 13
- AutoSize = False
- Caption = 'When Protection Button is Clicked Apply following Options:'
- Color = clBtnFace
- ParentColor = False
- end
- object GroupBoxAntiSpam: TGroupBox
- Left = 12
- Top = 77
- Width = 370
- Height = 188
- Caption = ' Anti Spam Control '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- object CheckBoxAnAcceptCL: TCheckBox
- Left = 16
- Top = 18
- Width = 349
- Height = 20
- Caption = 'Accept Messages Only from Users on my Contact List'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object CheckBoxAnDontAccPager: TCheckBox
- Left = 16
- Top = 39
- Width = 349
- Height = 20
- Caption = 'Do not Accept Pager and Email Express Messages'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- object GroupBoxAnForNotList: TGroupBox
- Left = 14
- Top = 78
- Width = 345
- Height = 91
- Caption = ' For Users not on my Contact List '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- object CheckBoxAnDontAuth: TCheckBox
- Left = 14
- Top = 18
- Width = 325
- Height = 20
- Caption = 'Do not Accept Messages concerning Authorization '
- TabOrder = 0
- end
- object CheckBoxAnDontUrls: TCheckBox
- Left = 14
- Top = 39
- Width = 325
- Height = 20
- Caption = 'Do not Accept URLs'
- Checked = True
- State = cbChecked
- TabOrder = 1
- end
- object CheckBoxAnEnBot: TCheckBox
- Left = 14
- Top = 64
- Width = 17
- Height = 17
- TabOrder = 2
- end
- object ButtonAnBot: TButton
- Left = 35
- Top = 63
- Width = 159
- Height = 20
- Caption = 'Anti-Spam Bot'
- TabOrder = 3
- OnClick = ButtonAnBotClick
- end
- end
- end
- object GroupBoxAntiFlood: TGroupBox
- Left = 12
- Top = 272
- Width = 370
- Height = 81
- Caption = ' [qip] Anti Flood Protection '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 3
- object CheckBoxAnEnBlockAll: TCheckBox
- Left = 16
- Top = 23
- Width = 349
- Height = 20
- Caption = 'Enable Blocking of All Messages from All Users'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object CheckBoxAnEnBlockAuth: TCheckBox
- Left = 16
- Top = 47
- Width = 349
- Height = 20
- Caption = 'Enable Blocking of Messages concerning Authorization'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- end
- object CheckBoxAnEnAntispam: TCheckBox
- Left = 54
- Top = 26
- Width = 335
- Height = 20
- Caption = 'Enable Anti Spam Control'
- TabOrder = 0
- OnClick = CheckBoxAnEnAntispamClick
- end
- object CheckBoxAnEnAntiflood: TCheckBox
- Left = 54
- Top = 47
- Width = 335
- Height = 20
- Caption = 'Enable Anti Flood Protection'
- TabOrder = 1
- OnClick = CheckBoxAnEnAntifloodClick
- end
- object PanelProtPic: TPanel
- Left = 12
- Top = 28
- Width = 35
- Height = 35
- BevelOuter = bvLowered
- TabOrder = 4
- object ImageProtect: TImage
- Left = 10
- Top = 9
- Width = 18
- Height = 18
- end
- end
- end
- object TabSounds: TTabSheet
- Caption = 'Sounds'
- object GroupBoxSnd: TGroupBox
- Left = 12
- Top = 5
- Width = 370
- Height = 348
- Caption = ' [qip] Sounds '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object ListViewSnd: TListView
- Left = 16
- Top = 45
- Width = 337
- Height = 260
- Columns = <
- item
- Caption = 'Events'
- Width = 150
- end
- item
- Caption = 'Sound File Name'
- Width = 150
- end>
- ColumnClick = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- HideSelection = False
- ReadOnly = True
- RowSelect = True
- ParentFont = False
- SmallImages = MainForm.ImageListCLS
- TabOrder = 1
- ViewStyle = vsReport
- end
- object CheckBoxSndDisable: TCheckBox
- Left = 16
- Top = 22
- Width = 345
- Height = 20
- Caption = 'Disable Sounds'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object ButtonSndChange: TButton
- Left = 16
- Top = 313
- Width = 89
- Height = 25
- Caption = 'Change'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = ButtonSndChangeClick
- end
- object ButtonSndRemove: TButton
- Left = 112
- Top = 313
- Width = 89
- Height = 25
- Caption = 'Remove'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnClick = ButtonSndRemoveClick
- end
- object ButtonSndPreview: TButton
- Left = 272
- Top = 313
- Width = 81
- Height = 25
- Caption = 'Preview'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- OnClick = ButtonSndPreviewClick
- end
- object SndBar1: TTrackBar
- Left = 209
- Top = 312
- Width = 56
- Height = 25
- LineSize = 5
- Max = 0
- Min = -2000
- PageSize = 500
- Frequency = 500
- TabOrder = 4
- ThumbLength = 15
- end
- end
- end
- object TabLng: TTabSheet
- Caption = 'Language'
- object GroupBoxLI: TGroupBox
- Left = 12
- Top = 5
- Width = 370
- Height = 75
- Caption = ' User Interface Language '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object LabelLIRestart: TLabel
- Left = 16
- Top = 53
- Width = 197
- Height = 13
- Caption = 'Note: Restart qip to Apply New Language'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object CBLang: TComboBox
- Left = 16
- Top = 25
- Width = 137
- Height = 21
- Style = csDropDownList
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 0
- ParentFont = False
- TabOrder = 0
- OnChange = CBLangChange
- OnDropDown = CBLangDropDown
- end
- object ButtonLIVisit: TButton
- Left = 173
- Top = 25
- Width = 169
- Height = 22
- Caption = 'Visit Our Homepage'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = ButtonLIVisitClick
- end
- end
- object GroupBoxLIDesc: TGroupBox
- Left = 12
- Top = 156
- Width = 370
- Height = 197
- Caption = ' Description / Author '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- object MemoLI: TMemo
- Left = 16
- Top = 24
- Width = 337
- Height = 161
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- ReadOnly = True
- ScrollBars = ssVertical
- TabOrder = 0
- end
- end
- object GroupBoxLICharset: TGroupBox
- Left = 12
- Top = 89
- Width = 370
- Height = 57
- Caption = ' Charset '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- object CBCharset: TComboBox
- Left = 16
- Top = 21
- Width = 137
- Height = 21
- Style = csDropDownList
- DropDownCount = 20
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 13
- ParentFont = False
- TabOrder = 0
- OnChange = CBCharsetChange
- Items.Strings = (
- 'Default'
- 'Cyrillic'
- 'Western'
- 'Hebrew'
- 'Arabic'
- 'Greek'
- 'Turkish'
- 'Baltic'
- 'Central European'
- 'Thai')
- end
- object ButtonApplyCharset: TButton
- Left = 173
- Top = 21
- Width = 100
- Height = 21
- Caption = 'Apply'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = ButtonApplyCharsetClick
- end
- end
- end
- object TabSkins: TTabSheet
- Caption = 'Skins'
- object GroupBoxSkins: TGroupBox
- Left = 12
- Top = 5
- Width = 370
- Height = 75
- Caption = ' Skins / Icons '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object LabelSkinRestart: TLabel
- Left = 16
- Top = 54
- Width = 170
- Height = 13
- Caption = 'Note: Restart qip to Apply New Skin'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object CBSkins: TComboBox
- Left = 16
- Top = 25
- Width = 153
- Height = 21
- Style = csDropDownList
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 0
- ParentFont = False
- TabOrder = 0
- OnChange = CBSkinsChange
- OnDropDown = CBSkinsDropDown
- end
- object ButtonSkins: TButton
- Left = 181
- Top = 25
- Width = 169
- Height = 22
- Caption = 'More Skins'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = ButtonLIVisitClick
- end
- end
- object GroupBoxSkinDesc: TGroupBox
- Left = 12
- Top = 249
- Width = 370
- Height = 104
- Caption = ' Description / Author '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- object MemoSkin: TMemo
- Left = 10
- Top = 17
- Width = 351
- Height = 74
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- ReadOnly = True
- ScrollBars = ssVertical
- TabOrder = 0
- end
- end
- object GroupBoxSmilies: TGroupBox
- Left = 12
- Top = 89
- Width = 370
- Height = 152
- Caption = ' Skin Smilies '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- object PanelSmilies: TPanel
- Left = 10
- Top = 64
- Width = 351
- Height = 73
- BevelOuter = bvLowered
- TabOrder = 3
- object MemoSmilies: TMemo
- Left = 1
- Top = 1
- Width = 349
- Height = 71
- Align = alClient
- BevelInner = bvNone
- BorderStyle = bsNone
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- Lines.Strings = (
- 'Note: Restart qip to use new Smilies.'
- 'Attention: Animated Smilies can slow down qip because of system '
- 'resources. From time to time these smilies will be replaced '
- 'automatically by text in Messaging Window to free resources.')
- ParentFont = False
- ReadOnly = True
- ScrollBars = ssVertical
- TabOrder = 0
- end
- end
- object RBSimpleSmilies: TRadioButton
- Left = 12
- Top = 17
- Width = 189
- Height = 20
- Caption = 'Simple Smilies'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object RBAnimSmilies: TRadioButton
- Left = 12
- Top = 37
- Width = 189
- Height = 20
- Caption = 'Animated Smilies'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- TabStop = True
- end
- object RBTextSmilies: TRadioButton
- Left = 204
- Top = 17
- Width = 157
- Height = 20
- Caption = 'Text smilies'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- end
- end
- end
- object TabID: TTabSheet
- Caption = 'Client iD'
- object GroupBoxCli: TGroupBox
- Left = 12
- Top = 5
- Width = 370
- Height = 348
- Caption = ' Client Identification '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object LabelAvailable: TLabel
- Left = 20
- Top = 99
- Width = 65
- Height = 13
- Caption = 'Available IDs:'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object LabelProtVer: TLabel
- Left = 18
- Top = 149
- Width = 98
- Height = 13
- Caption = 'DC Protocol Version:'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object Label3Cpas: TLabel
- Left = 18
- Top = 197
- Width = 280
- Height = 13
- Caption = 'You can add 3 your Client Capability Strings (max 16 chars):'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object CBiDs: TComboBox
- Left = 17
- Top = 115
- Width = 136
- Height = 21
- Style = csDropDownList
- DropDownCount = 20
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 13
- ParentFont = False
- TabOrder = 1
- OnChange = CBiDsChange
- Items.Strings = (
- 'qip 2005 (UTF8)'
- 'qip 2005'
- 'ICQ 5'
- 'ICQLite 4'
- 'ICQLite'
- 'ICQ 2003b Pro'
- 'ICQ 2002/2003a'
- 'ICQ 2001'
- 'ICQ 2 GO'
- 'Mac ICQ'
- 'AIM'
- 'Miranda'
- '&RQ'
- 'Trillian'
- 'SIM'
- 'LICQ'
- '- ? -')
- end
- object PanelAttent: TPanel
- Left = 16
- Top = 23
- Width = 338
- Height = 68
- BevelOuter = bvLowered
- TabOrder = 0
- object MemoCli: TMemo
- Left = 1
- Top = 1
- Width = 336
- Height = 66
- Align = alClient
- BevelInner = bvNone
- BorderStyle = bsNone
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- Lines.Strings = (
- 'Attention: This Option is for Advanced users only, if you don'#39't '
-
- 'know what it is then please leave it as is. By changing Client I' +
- 'd '
- 'some qip features can be disabled and can cause qip instability.')
- ParentFont = False
- ReadOnly = True
- ScrollBars = ssVertical
- TabOrder = 0
- end
- end
- object EditProtVer: TEdit
- Left = 17
- Top = 165
- Width = 136
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 5
- ParentFont = False
- TabOrder = 2
- OnChange = EditProtVerChange
- end
- object EditCap1: TEdit
- Left = 17
- Top = 213
- Width = 327
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 16
- ParentFont = False
- TabOrder = 3
- OnChange = EditProtVerChange
- end
- object EditCap2: TEdit
- Left = 17
- Top = 237
- Width = 327
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 16
- ParentFont = False
- TabOrder = 4
- OnChange = EditProtVerChange
- end
- object EditCap3: TEdit
- Left = 17
- Top = 261
- Width = 327
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 16
- ParentFont = False
- TabOrder = 5
- OnChange = EditProtVerChange
- end
- end
- end
- object TabEye: TTabSheet
- Caption = 'Great Eye'
- object GroupBoxGrEye: TGroupBox
- Left = 12
- Top = 5
- Width = 370
- Height = 348
- Caption = ' [qip] Great Eye List '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object ListViewEye: TListView
- Left = 16
- Top = 96
- Width = 337
- Height = 209
- Columns = <
- item
- Caption = 'ICQ# / SN'
- Width = 120
- end
- item
- Caption = 'Event Date'
- Width = 170
- end>
- ColumnClick = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- HideSelection = False
- ReadOnly = True
- RowSelect = True
- ParentFont = False
- PopupMenu = PopupMenuEye
- SmallImages = MainForm.ImageListCLS
- TabOrder = 2
- ViewStyle = vsReport
- end
- object CheckBoxEyeDisable: TCheckBox
- Left = 16
- Top = 71
- Width = 345
- Height = 20
- Caption = 'Disable Great Eye Feature'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- object ButtonEyeClear: TButton
- Left = 224
- Top = 310
- Width = 129
- Height = 24
- Caption = 'Clear List'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnClick = ButtonEyeClearClick
- end
- object ButtonEyeRemove: TButton
- Left = 16
- Top = 310
- Width = 129
- Height = 24
- Caption = 'Remove'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnClick = ButtonEyeRemoveClick
- end
- object PanelGrMemo: TPanel
- Left = 16
- Top = 21
- Width = 338
- Height = 44
- BevelOuter = bvLowered
- TabOrder = 0
- object MemoEye: TMemo
- Left = 1
- Top = 1
- Width = 336
- Height = 42
- Align = alClient
- BevelInner = bvNone
- BorderStyle = bsNone
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- Lines.Strings = (
- 'Great Eye feature allows you to see who added you, who tried '
- 'to read your status message and all other service packets from '
- 'all users who is Not on your Contact List.')
- ParentFont = False
- ReadOnly = True
- ScrollBars = ssVertical
- TabOrder = 0
- end
- end
- end
- end
- object TabHotkey: TTabSheet
- Caption = 'Shortcuts'
- ImageIndex = 12
- object GroupBoxHK: TGroupBox
- Left = 12
- Top = 5
- Width = 370
- Height = 348
- Caption = ' Keyboard Shortcuts '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object CheckBoxHKActivate: TCheckBox
- Left = 16
- Top = 19
- Width = 347
- Height = 20
- Caption = 'Activate Global Keyboard Shortcuts'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object ListViewHK: TListView
- Left = 16
- Top = 45
- Width = 337
- Height = 268
- Columns = <
- item
- Caption = 'Action'
- Width = 210
- end
- item
- Caption = 'Shortcut'
- Width = 100
- end>
- ColumnClick = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- HideSelection = False
- ReadOnly = True
- RowSelect = True
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- ViewStyle = vsReport
- OnClick = ListViewHKClick
- OnCustomDrawItem = ListViewHKCustomDrawItem
- OnKeyDown = ListViewHKKeyDown
- end
- object HotKey: THotKey
- Left = 16
- Top = 320
- Width = 121
- Height = 19
- HotKey = 16384
- InvalidKeys = [hcNone, hcShift, hcAlt]
- Modifiers = [hkCtrl]
- TabOrder = 2
- end
- object ButtonAssign: TButton
- Left = 144
- Top = 319
- Width = 97
- Height = 21
- Caption = 'Assign'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnClick = ButtonAssignClick
- end
- object ButtonHKRemove: TButton
- Left = 256
- Top = 319
- Width = 97
- Height = 21
- Caption = 'Remove'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnClick = ButtonHKRemoveClick
- end
- end
- end
- end
- object PanelMenu: TPanel
- Left = 0
- Top = 0
- Width = 153
- Height = 386
- Align = alLeft
- TabOrder = 0
- object LBMenu: TListBox
- Left = 8
- Top = 8
- Width = 137
- Height = 368
- Style = lbOwnerDrawFixed
- ItemHeight = 28
- Items.Strings = (
- 'General'
- 'Contact List'
- 'Events'
- 'History'
- 'Status Mode'
- 'Anti Spam / Flood'
- 'Sounds'
- 'Language'
- 'Skins / Icons'
- 'Client iD'
- 'Great Eye'
- 'Shortcuts')
- TabOrder = 0
- OnClick = LBMenuClick
- OnDrawItem = LBMenuDrawItem
- OnMouseUp = LBMenuMouseUp
- end
- end
- object TransPanelDown: TPanel
- Left = 0
- Top = 386
- Width = 549
- Height = 39
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 2
- object ButtonOK: TButton
- Left = 223
- Top = 8
- Width = 101
- Height = 25
- Caption = 'OK'
- TabOrder = 0
- OnClick = ButtonOKClick
- end
- object ButtonApply: TButton
- Left = 442
- Top = 8
- Width = 101
- Height = 25
- Caption = 'Apply'
- TabOrder = 2
- OnClick = ButtonApplyClick
- end
- object ButtonCancel: TButton
- Left = 333
- Top = 8
- Width = 101
- Height = 25
- Caption = 'Cancel'
- TabOrder = 1
- OnClick = ButtonCancelClick
- end
- object ButtonDefs: TButton
- Left = 5
- Top = 8
- Width = 142
- Height = 25
- Caption = 'Restore Defaults'
- TabOrder = 3
- OnClick = ButtonDefsClick
- end
- end
- object ImageListMenu: TImageList
- Left = 88
- Top = 296
- end
- object ImageListS: TImageList
- Left = 48
- Top = 296
- end
- object OpenDialog1: TOpenDialog
- DefaultExt = 'wav'
- Filter = 'Wave Files Only|*.wav'
- Options = [ofHideReadOnly, ofNoNetworkButton, ofEnableSizing, ofDontAddToRecent]
- Left = 171
- Top = 397
- end
- object PopupMenuEye: TPopupMenu
- Images = MainForm.ImageList1
- OnPopup = PopupMenuEyePopup
- Left = 19
- Top = 301
- object CustomItemCheckSt: TMenuItem
- Caption = 'Check Status'
- OnClick = CustomItemCheckStClick
- end
- object CustomItemUserDets: TMenuItem
- Caption = 'User Details'
- OnClick = CustomItemUserDetsClick
- end
- object CustomItemCopySN: TMenuItem
- Caption = 'Copy User'#39's Uin or SN'
- OnClick = CustomItemCopySNClick
- end
- object CustomItemRemSelf: TMenuItem
- Caption = 'Remove Myself from User'#39's CL'
- OnClick = CustomItemRemSelfClick
- end
- object CustomItemSendMsg: TMenuItem
- Caption = 'Send Message'
- OnClick = CustomItemSendMsgClick
- end
- end
- object TimerLoadSave: TTimer
- Enabled = False
- Interval = 10
- OnTimer = TimerLoadSaveTimer
- Left = 189
- Top = 392
- end
- object TimerTrans: TTimer
- OnTimer = TimerTransTimer
- Left = 153
- Top = 392
- end
- end
-