home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2001 April
/
PCWorld_2001-04_cd.bin
/
Software
/
TemaCD
/
xnews
/
Xnews.exe
/
0
/
RCDATA
/
TCONFIGFORM
/
TCONFIGFORM.txt
Wrap
Text File
|
2001-01-31
|
55KB
|
2,150 lines
object ConfigForm: TConfigForm
Left = 133
Top = 50
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Setup Xnews'
ClientHeight = 462
ClientWidth = 612
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnShow = FormShow
PixelsPerInch = 120
TextHeight = 16
object Label20: TLabel
Left = 25
Top = 424
Width = 260
Height = 32
Caption =
'Note: Some changes will not take place until'#13#10'the next time the ' +
'affected window is opened'
end
object PageControl: TPageControl
Left = 4
Top = 4
Width = 603
Height = 415
ActivePage = IDTab
TabOrder = 0
OnChange = PageControlChange
OnChanging = PageControlChanging
object IDTab: TTabSheet
Caption = 'Identities'
object Label1: TLabel
Left = 213
Top = 24
Width = 61
Height = 16
Caption = 'Full Name'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 213
Top = 69
Width = 34
Height = 16
Caption = 'Email'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 213
Top = 114
Width = 79
Height = 16
Caption = 'Public Email*'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 213
Top = 158
Width = 75
Height = 16
Caption = 'Organization'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 213
Top = 203
Width = 62
Height = 16
Caption = 'IDToken**'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 213
Top = 248
Width = 77
Height = 16
Caption = 'Signature file'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object IDLV: TMyListView
Left = 16
Top = 16
Width = 169
Height = 209
Columns = <
item
Caption = 'Identities'
Width = 160
end>
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
HideSelection = False
HotTrackStyles = []
ReadOnly = True
RowSelect = True
ParentFont = False
ShowColumnHeaders = False
TabOrder = 0
ViewStyle = vsReport
OnChange = IDLVChange
end
object IDName: TEdit
Left = 301
Top = 19
Width = 228
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
OnChange = IDItemChange
end
object IDEmail: TEdit
Left = 301
Top = 64
Width = 228
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnChange = IDItemChange
OnExit = IDEmailExit
end
object IDPubEmail: TEdit
Left = 301
Top = 109
Width = 228
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
OnChange = IDItemChange
end
object IDOrg: TEdit
Left = 301
Top = 153
Width = 228
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
OnChange = IDItemChange
end
object IDIDToken: TEdit
Left = 301
Top = 198
Width = 228
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 8
OnChange = IDItemChange
OnExit = IDIDTokenExit
end
object IDSig: TEdit
Left = 301
Top = 243
Width = 228
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 9
OnChange = IDItemChange
end
object IDAdd: TButton
Left = 13
Top = 235
Width = 52
Height = 25
Caption = '&New...'
TabOrder = 1
OnClick = IDAddClick
end
object IDDel: TButton
Left = 138
Top = 235
Width = 52
Height = 25
Caption = '&Delete'
TabOrder = 3
OnClick = IDDelClick
end
object GroupBox1: TGroupBox
Left = 19
Top = 272
Width = 529
Height = 94
Caption = 'Notes'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 10
object Label7: TLabel
Left = 17
Top = 19
Width = 467
Height = 64
Caption =
' * Public email is the email you want to use when posting to us' +
'enet'#13#10' as opposed to the email to use when replying by privat' +
'e email'#13#10' ** IDToken is a string of letters and/or numbers to u' +
'niquely identify you'#13#10' Xnews uses this to form Message-IDs i' +
'n order to track articles posted by you.'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
end
object IDSelSig: TButton
Left = 540
Top = 244
Width = 25
Height = 25
Caption = '...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 11
OnClick = SelectFile
end
object IDClone: TButton
Left = 76
Top = 235
Width = 52
Height = 25
Caption = 'Clone'
TabOrder = 2
OnClick = IDCloneClick
end
end
object SvTab: TTabSheet
Caption = 'Servers'
ImageIndex = 1
object Label14: TLabel
Left = 203
Top = 11
Width = 215
Height = 16
Caption = 'News Server (e.g., news.myisp.com)'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label15: TLabel
Left = 463
Top = 11
Width = 106
Height = 16
Caption = 'Port # (0 = default)'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 203
Top = 201
Width = 78
Height = 16
Caption = 'NewsRC File'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 203
Top = 231
Width = 170
Height = 16
Caption = 'Identity to use with this server'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label46: TLabel
Left = 204
Top = 165
Width = 151
Height = 16
Caption = 'SMTP (mail send) server'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SvLV: TMyListView
Left = 16
Top = 16
Width = 169
Height = 201
Columns = <
item
Width = 160
end>
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
HideSelection = False
HotTrackStyles = []
ReadOnly = True
RowSelect = True
ParentFont = False
ShowColumnHeaders = False
SmallImages = XnewsFrame.TaskBarImages
TabOrder = 0
ViewStyle = vsReport
OnChange = SvLVChange
OnMouseDown = SvLVMouseDown
end
object SvAdd: TButton
Left = 13
Top = 224
Width = 50
Height = 25
Caption = '&New...'
TabOrder = 1
OnClick = SvAddClick
end
object SvDelete: TButton
Left = 140
Top = 224
Width = 50
Height = 25
Caption = '&Delete'
TabOrder = 3
OnClick = SvDeleteClick
end
object SvServer: TEdit
Left = 203
Top = 31
Width = 262
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
OnChange = ServerItemChange
end
object SvPortNo: TEdit
Left = 480
Top = 31
Width = 49
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnChange = ServerItemChange
end
object GroupBox2: TGroupBox
Left = 203
Top = 60
Width = 366
Height = 89
Caption = 'News authentication (leave blank unless required)'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
object Username: TLabel
Left = 17
Top = 25
Width = 63
Height = 16
Caption = 'Username'
end
object Label17: TLabel
Left = 18
Top = 56
Width = 60
Height = 16
Caption = 'Password'
end
object Label62: TLabel
Left = 272
Top = 56
Width = 56
Height = 16
Caption = '(optional)'
end
object SvUser: TEdit
Left = 98
Top = 21
Width = 226
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnChange = ServerItemChange
end
object SvPasswd: TEdit
Left = 98
Top = 51
Width = 167
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
PasswordChar = '*'
TabOrder = 1
OnChange = ServerItemChange
end
end
object SvNewsRC: TEdit
Left = 302
Top = 197
Width = 223
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 8
OnChange = ServerItemChange
end
object SvID: TComboBox
Left = 384
Top = 228
Width = 145
Height = 24
Style = csDropDownList
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 0
ParentFont = False
TabOrder = 10
OnChange = SvIDChange
end
object GroupBox3: TGroupBox
Left = 16
Top = 257
Width = 561
Height = 117
Caption = 'Customize identity data for this server (optional)'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 11
object Label10: TLabel
Left = 13
Top = 21
Width = 37
Height = 16
Caption = 'Name'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 13
Top = 51
Width = 34
Height = 16
Caption = 'Email'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 13
Top = 81
Width = 74
Height = 16
Caption = 'Public Email'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 265
Top = 21
Width = 75
Height = 16
Caption = 'Organization'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label16: TLabel
Left = 265
Top = 51
Width = 52
Height = 16
Caption = 'IDToken'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label18: TLabel
Left = 265
Top = 81
Width = 82
Height = 16
Caption = 'Signature File'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SVName: TEdit
Left = 91
Top = 21
Width = 159
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnChange = ServerItemChange
end
object SvEmail: TEdit
Left = 91
Top = 51
Width = 159
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnChange = ServerItemChange
end
object SvPubEmail: TEdit
Left = 91
Top = 81
Width = 159
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnChange = ServerItemChange
end
object SvOrg: TEdit
Left = 351
Top = 21
Width = 159
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnChange = ServerItemChange
end
object SvIDToken: TEdit
Left = 351
Top = 51
Width = 159
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
OnChange = ServerItemChange
OnExit = IDIDTokenExit
end
object SvSig: TEdit
Left = 351
Top = 81
Width = 159
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnChange = ServerItemChange
end
object SvSelSig: TButton
Left = 524
Top = 81
Width = 25
Height = 25
Caption = '...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = SelectFile
end
end
object SvSelRC: TButton
Left = 537
Top = 197
Width = 25
Height = 25
Caption = '...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 9
OnClick = SelectFile
end
object SvSMTP: TEdit
Left = 368
Top = 160
Width = 157
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
OnChange = ServerItemChange
end
object SvClone: TButton
Left = 77
Top = 224
Width = 50
Height = 25
Caption = 'Clone'
TabOrder = 2
OnClick = SvCloneClick
end
end
object FCTab: TTabSheet
Caption = 'Fonts && Colors'
ImageIndex = 2
object Label19: TLabel
Left = 432
Top = 264
Width = 95
Height = 32
Alignment = taCenter
Caption = 'Click on sample'#13#10'to change'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object lbStatus: TLabel
Left = 476
Top = 136
Width = 81
Height = 33
Cursor = crHandPoint
Alignment = taCenter
AutoSize = False
Caption = 'Sample'
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -17
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
OnClick = ChangeFont
end
object Label48: TLabel
Left = 392
Top = 136
Width = 66
Height = 16
Caption = 'Status Font'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label58: TLabel
Left = 392
Top = 176
Width = 64
Height = 16
Caption = 'Editor Font'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object lbEditor: TLabel
Left = 476
Top = 176
Width = 81
Height = 33
Cursor = crHandPoint
Alignment = taCenter
AutoSize = False
Caption = 'Sample'
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clBtnText
Font.Height = -17
Font.Name = 'Courier New'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
OnClick = ChangeFont
end
object GroupBox4: TGroupBox
Left = 48
Top = 8
Width = 521
Height = 105
Caption = 'List Fonts and Colors'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
object Label21: TLabel
Left = 24
Top = 27
Width = 119
Height = 16
Caption = 'Groups background'
end
object lbGrp: TLabel
Left = 362
Top = 21
Width = 134
Height = 30
Cursor = crHandPoint
Alignment = taCenter
AutoSize = False
Caption = 'Sample'
Color = clWhite
ParentColor = False
OnClick = ChangeFont
end
object Label22: TLabel
Left = 24
Top = 63
Width = 119
Height = 16
Caption = 'Articles background'
end
object lbArt: TLabel
Left = 293
Top = 60
Width = 71
Height = 30
Cursor = crHandPoint
Alignment = taCenter
AutoSize = False
Caption = 'Sample'
Color = clWhite
ParentColor = False
OnClick = ChangeFont
end
object lbGrpColor: TLabel
Left = 154
Top = 21
Width = 134
Height = 30
Cursor = crHandPoint
AutoSize = False
Color = clWhite
ParentColor = False
OnClick = lbBkgClick
end
object lbArtColor: TLabel
Left = 154
Top = 60
Width = 71
Height = 30
Cursor = crHandPoint
AutoSize = False
Color = clWhite
ParentColor = False
OnClick = lbBkgClick
end
object Label34: TLabel
Left = 312
Top = 27
Width = 26
Height = 16
Caption = 'Font'
end
object Label44: TLabel
Left = 243
Top = 63
Width = 45
Height = 16
Caption = 'Unread'
end
object Label32: TLabel
Left = 384
Top = 63
Width = 34
Height = 16
Caption = 'Read'
end
object lbRead: TLabel
Left = 426
Top = 60
Width = 71
Height = 30
Cursor = crHandPoint
Alignment = taCenter
AutoSize = False
Caption = 'Sample'
Color = clWhite
ParentColor = False
OnClick = ChangeFont
end
end
object GroupBox5: TGroupBox
Left = 48
Top = 128
Width = 321
Height = 241
Caption = 'Viewer Fonts and Colors'
TabOrder = 1
object Label24: TLabel
Left = 24
Top = 28
Width = 106
Height = 16
Caption = 'Background color'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object lbBkg: TLabel
Left = 154
Top = 23
Width = 134
Height = 30
Cursor = crHandPoint
AutoSize = False
Color = clWhite
ParentColor = False
OnClick = lbBkgClick
end
object Label25: TLabel
Left = 24
Top = 63
Width = 71
Height = 16
Caption = 'Default Font'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object lbDef: TLabel
Left = 154
Top = 57
Width = 134
Height = 30
Cursor = crHandPoint
Alignment = taCenter
AutoSize = False
Caption = 'Sample'
Color = clWhite
ParentColor = False
OnClick = ChangeFont
end
object Label27: TLabel
Left = 24
Top = 97
Width = 82
Height = 16
Caption = 'Headers Font'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object lbHdrs: TLabel
Left = 154
Top = 91
Width = 134
Height = 30
Cursor = crHandPoint
Alignment = taCenter
AutoSize = False
Caption = 'Sample'
Color = clWhite
ParentColor = False
OnClick = ChangeFont
end
object Label29: TLabel
Left = 24
Top = 132
Width = 102
Height = 16
Caption = 'Quoted Text Font'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object lbQuoted: TLabel
Left = 154
Top = 126
Width = 134
Height = 30
Cursor = crHandPoint
Alignment = taCenter
AutoSize = False
Caption = 'Sample'
Color = clWhite
ParentColor = False
OnClick = ChangeFont
end
object Label31: TLabel
Left = 24
Top = 201
Width = 60
Height = 16
Caption = 'Misc. Font'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object lbMisc: TLabel
Left = 154
Top = 194
Width = 134
Height = 30
Cursor = crHandPoint
Alignment = taCenter
AutoSize = False
Caption = 'Sample'
Color = clWhite
ParentColor = False
OnClick = ChangeFont
end
object Label33: TLabel
Left = 24
Top = 166
Width = 99
Height = 16
Caption = 'Fixed Width Font'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object lbFixed: TLabel
Left = 154
Top = 160
Width = 134
Height = 30
Cursor = crHandPoint
Alignment = taCenter
AutoSize = False
Caption = 'Sample'
Color = clWhite
ParentColor = False
OnClick = ChangeFont
end
end
object bUseWindows: TButton
Left = 392
Top = 313
Width = 177
Height = 40
Caption = 'Use default bkgrnd color'
TabOrder = 2
OnClick = bUseWindowsClick
end
end
object DispTab: TTabSheet
Caption = 'Display'
ImageIndex = 4
object Label37: TLabel
Left = 48
Top = 334
Width = 473
Height = 32
Caption =
'Note: Advanced users may override settings for sorting, threadin' +
'g, and layout on'#13#10' per group(s) basis by editing the' +
' groups.ini file. See manual for details.'
end
object cbShowToolTip: TCheckBox
Left = 326
Top = 151
Width = 121
Height = 17
Caption = 'Show tool tip'
TabOrder = 4
end
object cbShowPopUp: TCheckBox
Left = 326
Top = 128
Width = 233
Height = 17
Caption = 'Show popup labels in articles listing'
TabOrder = 3
end
object cbDrawGrids: TCheckBox
Left = 326
Top = 104
Width = 121
Height = 17
Caption = 'Draw grid lines'
TabOrder = 2
end
object GroupBox6: TGroupBox
Left = 16
Top = 16
Width = 289
Height = 153
Caption = 'Sorting and Threading'
TabOrder = 0
object Label35: TLabel
Left = 16
Top = 29
Width = 42
Height = 16
Caption = 'Sort on'
end
object coSortOn: TComboBox
Left = 80
Top = 24
Width = 193
Height = 24
Style = csDropDownList
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 16
Items.Strings = (
'none'
'Subject'
'Selection'
'Lines'
'From'
'Date'
'Score'
'No')
ParentFont = False
TabOrder = 0
end
object rbAsc: TRadioButton
Left = 80
Top = 56
Width = 89
Height = 17
Caption = 'Ascending'
TabOrder = 1
end
object rbDesc: TRadioButton
Left = 176
Top = 56
Width = 105
Height = 17
Caption = 'Descending'
TabOrder = 2
end
object cbMultiPartThread: TCheckBox
Left = 16
Top = 81
Width = 265
Height = 17
Caption = 'Thread multipart binaries in all groups'
TabOrder = 3
end
object cbExpandThreads: TCheckBox
Left = 16
Top = 102
Width = 209
Height = 17
Caption = 'Expand all threads by default'
TabOrder = 4
end
object cbNSNT: TCheckBox
Left = 16
Top = 123
Width = 257
Height = 17
Caption = 'Start new thread when subject changes'
TabOrder = 5
end
end
object GroupBox7: TGroupBox
Left = 325
Top = 16
Width = 257
Height = 81
Caption = 'Articles Window Layout'
TabOrder = 1
object cbSplit: TCheckBox
Left = 24
Top = 24
Width = 209
Height = 17
Caption = 'Split Screen display by default'
TabOrder = 0
end
object rbHoriz: TRadioButton
Left = 40
Top = 48
Width = 105
Height = 17
Caption = 'Horizontally'
TabOrder = 1
end
object rbVert: TRadioButton
Left = 144
Top = 48
Width = 97
Height = 17
Caption = 'Vertically'
TabOrder = 2
end
end
object GroupBox8: TGroupBox
Left = 16
Top = 184
Width = 569
Height = 137
Caption = 'Visible Headers in Article Viewer'
TabOrder = 5
object rbShowAllHdrs: TRadioButton
Left = 16
Top = 24
Width = 153
Height = 17
Caption = 'Show all headers'
TabOrder = 0
OnClick = rbShowAllHdrsClick
end
object rbShowSelHdrs: TRadioButton
Left = 16
Top = 48
Width = 177
Height = 17
Caption = 'Show specified headers'
TabOrder = 1
OnClick = rbShowAllHdrsClick
end
object bResetVisHdrs: TButton
Left = 448
Top = 24
Width = 111
Height = 25
Caption = 'Reset to default'
TabOrder = 3
OnClick = bResetVisHdrsClick
end
object cbSuppress: TCheckBox
Left = 16
Top = 106
Width = 167
Height = 19
Caption = 'Suppress in split screen'
TabOrder = 4
end
object VisHdrs: TMemo
Left = 208
Top = 24
Width = 225
Height = 94
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ScrollBars = ssVertical
TabOrder = 2
WordWrap = False
end
end
end
object tbFiling: TTabSheet
Caption = 'Files'
ImageIndex = -1
object GroupBox12: TGroupBox
Left = 20
Top = 6
Width = 553
Height = 139
Caption = 'Directories'
TabOrder = 0
object Label42: TLabel
Left = 18
Top = 21
Width = 175
Height = 16
Caption = 'Save attachments in directory'
end
object Label43: TLabel
Left = 306
Top = 21
Width = 185
Height = 16
Caption = 'Save decoded files in directory'
end
object Label60: TLabel
Left = 18
Top = 77
Width = 169
Height = 16
Caption = 'Save text articles in directory'
end
object miAttachDir: TEdit
Left = 18
Top = 41
Width = 191
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object SelAttachDir: TButton
Left = 222
Top = 41
Width = 25
Height = 25
Caption = '...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = SelectDir
end
object MiDecodeDir: TEdit
Left = 306
Top = 40
Width = 191
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object SelDecodeDir: TButton
Left = 509
Top = 41
Width = 25
Height = 25
Caption = '...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = SelectDir
end
object edSaveDir: TEdit
Left = 18
Top = 97
Width = 191
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
end
object SelSaveDir: TButton
Left = 222
Top = 97
Width = 25
Height = 25
Caption = '...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = SelectDir
end
end
object GroupBox13: TGroupBox
Left = 20
Top = 152
Width = 553
Height = 137
Caption = 'Attachment handling'
TabOrder = 1
object Label59: TLabel
Left = 20
Top = 45
Width = 188
Height = 32
Caption = 'Automatically save attachments'#13#10'of these types (*)'
end
object Label41: TLabel
Left = 308
Top = 44
Width = 194
Height = 32
Caption =
'Automatically launch after saving'#13#10'attachments of these types (*' +
')'
end
object Label61: TLabel
Left = 84
Top = 108
Width = 395
Height = 16
Caption =
'(*) Specify as list of extensions separated by | (e.g., .JPG|.TX' +
'T|.GIF)'
end
object cbAutoSaveAttachments: TCheckBox
Left = 19
Top = 22
Width = 230
Height = 17
Caption = 'Automatically save all attachments'
TabOrder = 0
OnClick = cbAutoSaveAttachmentsClick
end
object edSaveTypes: TEdit
Left = 20
Top = 82
Width = 191
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object MiLaunch: TEdit
Left = 308
Top = 82
Width = 191
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
end
object Sounds: TGroupBox
Left = 20
Top = 298
Width = 553
Height = 79
Caption = 'Sounds'
TabOrder = 2
object Label45: TLabel
Left = 20
Top = 21
Width = 140
Height = 16
Caption = '"Got reply" WAV sound'
end
object Label30: TLabel
Left = 308
Top = 21
Width = 142
Height = 16
Caption = '"File done" WAV sound'
end
object miGotReply: TEdit
Left = 20
Top = 41
Width = 191
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object SelGotReply: TButton
Left = 224
Top = 41
Width = 25
Height = 25
Caption = '...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = SelectFile
end
object MiFileDone: TEdit
Left = 308
Top = 41
Width = 191
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object SelFileDone: TButton
Left = 515
Top = 41
Width = 25
Height = 25
Caption = '...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = SelectFile
end
end
end
object tbStore: TTabSheet
Caption = 'Storage'
ImageIndex = 7
object Label66: TLabel
Left = 24
Top = 24
Width = 471
Height = 64
Caption =
'These settings determine whether headers and/or articles in subs' +
'cribed groups'#13#10'should by default be saved between sessions and f' +
'or how long.'#13#10#13#10'See the Storage section in the manual for furthe' +
'r explanation.'
end
object rgStore: TRadioGroup
Left = 26
Top = 103
Width = 255
Height = 138
Caption = 'Storage option'
Items.Strings = (
'Use default (no automatic setting)'
'Save nothing (turn off storage)'
'Save headers'
'Save headers and articles')
TabOrder = 0
OnClick = rgStoreClick
end
object pnExpire: TPanel
Left = 306
Top = 165
Width = 217
Height = 81
BevelOuter = bvNone
TabOrder = 1
object Label26: TLabel
Left = 8
Top = 16
Width = 65
Height = 16
Caption = 'Purge after'
end
object Label28: TLabel
Left = 164
Top = 14
Width = 30
Height = 16
Caption = 'days'
end
object Label65: TLabel
Left = 16
Top = 48
Width = 166
Height = 16
Caption = '(0 = when expired on server)'
end
object edExpire: TSpinEdit
Left = 83
Top = 11
Width = 73
Height = 26
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 2
MaxValue = 30
MinValue = 0
ParentFont = False
TabOrder = 0
Value = 0
end
end
end
object tbCompose: TTabSheet
Caption = 'Compose'
ImageIndex = 6
object Label47: TLabel
Left = 14
Top = 11
Width = 161
Height = 16
Caption = 'Wrap text at column (65..78)'
end
object Label49: TLabel
Left = 14
Top = 92
Width = 101
Height = 16
Caption = 'Custom Headers'
end
object Label50: TLabel
Left = 14
Top = 258
Width = 362
Height = 112
Caption =
'Notes:'#13#10' + Precede with an asterisk (*) if you want it to be on' +
' by default'#13#10' + You can have a blank header and fill in the val' +
'ue later'#13#10'Example:'#13#10' Approved: myname@myisp.com'#13#10' Keywords:'#13#10' ' +
' *X-Complaints-To: billg@microsoft.com'
end
object edWrapColumn: TSpinEdit
Left = 193
Top = 6
Width = 81
Height = 26
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxValue = 78
MinValue = 65
ParentFont = False
TabOrder = 0
Value = 76
OnChange = ComposeChange
end
object GroupBox11: TGroupBox
Left = 312
Top = 7
Width = 270
Height = 244
Caption = 'Attribution lines'
TabOrder = 4
object Label53: TLabel
Left = 17
Top = 21
Width = 57
Height = 16
Caption = 'FollowUp'
end
object Label54: TLabel
Left = 17
Top = 66
Width = 82
Height = 16
Caption = 'Reply by mail'
end
object Label55: TLabel
Left = 17
Top = 111
Width = 67
Height = 16
Caption = 'Forwarding'
end
object Label56: TLabel
Left = 16
Top = 156
Width = 124
Height = 80
Caption =
'%a = author name'#13#10'%f = name and email'#13#10'%d = date'#13#10'%z = GMT date/' +
'time'#13#10'%m = message-id'
end
object Label57: TLabel
Left = 152
Top = 156
Width = 106
Height = 64
Caption = '%e = author email'#13#10'%g = newsgroup'#13#10'%D = long date'#13#10'%% = %'
end
object edNewsAttrib: TEdit
Left = 17
Top = 37
Width = 217
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnChange = ComposeChange
end
object edMailAttrib: TEdit
Left = 17
Top = 82
Width = 217
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnChange = ComposeChange
end
object edForwAttrib: TEdit
Left = 17
Top = 129
Width = 217
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnChange = ComposeChange
end
end
object GroupBox14: TGroupBox
Left = 388
Top = 262
Width = 194
Height = 97
Caption = 'Attachments'
TabOrder = 5
object Label63: TLabel
Left = 11
Top = 59
Width = 46
Height = 16
Caption = 'Cut size'
end
object Label64: TLabel
Left = 149
Top = 59
Width = 28
Height = 16
Caption = 'lines'
end
object edCutsize: TSpinEdit
Left = 74
Top = 57
Width = 63
Height = 26
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 5
MaxValue = 15000
MinValue = 100
ParentFont = False
TabOrder = 1
Value = 200
OnChange = ComposeChange
end
object cbFC: TCheckBox
Left = 11
Top = 28
Width = 174
Height = 17
Caption = 'Show file count in subject'
TabOrder = 0
OnClick = ComposeChange
end
end
object cbAutoRewrap: TCheckBox
Left = 15
Top = 43
Width = 234
Height = 17
Caption = 'Automatically rewrap quoted text'
TabOrder = 1
OnClick = ComposeChange
end
object CustHdrs: TMemo
Left = 14
Top = 113
Width = 257
Height = 137
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
HideSelection = False
ParentFont = False
ScrollBars = ssVertical
TabOrder = 3
WordWrap = False
OnChange = ComposeChange
end
object cbKeepCopies: TCheckBox
Left = 15
Top = 65
Width = 234
Height = 17
Caption = 'Keep copies of sent messages'
TabOrder = 2
OnClick = ComposeChange
end
end
object TabSheet3: TTabSheet
Caption = 'Misc'
ImageIndex = 3
object Label38: TLabel
Left = 16
Top = 17
Width = 213
Height = 16
Caption = 'Default SMTP (mail sending) Server'
end
object MiSMTP: TEdit
Left = 16
Top = 38
Width = 193
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object rgScoreLoadOpt: TRadioGroup
Left = 312
Top = 255
Width = 257
Height = 106
Caption = 'When scorefile changes'
Items.Strings = (
'Reload without asking'
'Ask before reloading'
'Ignore (do nothing)')
TabOrder = 3
end
object GroupBox9: TGroupBox
Left = 16
Top = 74
Width = 273
Height = 246
Caption = 'Newsgroup Options'
TabOrder = 1
object Label51: TLabel
Left = 19
Top = 150
Width = 184
Height = 16
Caption = 'Update message counts every'
end
object Label52: TLabel
Left = 97
Top = 175
Width = 122
Height = 16
Caption = 'minutes (0 = disable)'
end
object Label39: TLabel
Left = 19
Top = 24
Width = 220
Height = 16
Caption = 'Kill articles crossposted to more than '
end
object Label40: TLabel
Left = 99
Top = 49
Width = 118
Height = 16
Caption = 'groups (0 = disable)'
end
object cbAutoGetMsgCounts: TCheckBox
Left = 19
Top = 102
Width = 233
Height = 17
Caption = 'Get all message counts on startup'
TabOrder = 2
end
object cbHideEmptyGroups: TCheckBox
Left = 19
Top = 126
Width = 230
Height = 17
Caption = 'Hide groups with no unread msgs'
TabOrder = 3
end
object edUpdateCountInterval: TSpinEdit
Left = 19
Top = 174
Width = 65
Height = 26
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxValue = 300
MinValue = 0
ParentFont = False
TabOrder = 4
Value = 0
end
object MiMaxXpost: TSpinEdit
Left = 19
Top = 45
Width = 65
Height = 26
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxValue = 30
MinValue = 0
ParentFont = False
TabOrder = 0
Value = 0
end
object cbOpenNextGroup: TCheckBox
Left = 19
Top = 213
Width = 206
Height = 17
Caption = 'Open next group after catchup'
TabOrder = 5
end
object cbLoadReadArticles: TCheckBox
Left = 19
Top = 80
Width = 158
Height = 17
Caption = 'Load read articles'
TabOrder = 1
end
end
object GroupBox10: TGroupBox
Left = 312
Top = 16
Width = 257
Height = 217
Caption = 'Articles Options'
TabOrder = 2
object Label23: TLabel
Left = 15
Top = 22
Width = 180
Height = 32
Caption = 'Treat lines matching this regex'#13#10'as quoted text'
end
object Label36: TLabel
Left = 15
Top = 106
Width = 129
Height = 32
Caption = 'Score for kept articles'#13#10'(0 = default score)'
end
object MiQuoteRegex: TEdit
Left = 15
Top = 59
Width = 191
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object cbIgnoreReWhenSorting: TCheckBox
Left = 15
Top = 161
Width = 177
Height = 17
Caption = 'Ignore Re: when sorting'
TabOrder = 2
end
object cbExpandWhenTag: TCheckBox
Left = 15
Top = 185
Width = 202
Height = 17
Caption = 'Expand thread when tagging'
TabOrder = 3
end
object edKeptScore: TSpinEdit
Left = 160
Top = 111
Width = 73
Height = 26
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxValue = 10000
MinValue = 0
ParentFont = False
TabOrder = 1
Value = 0
end
end
object bAssoc: TButton
Left = 16
Top = 332
Width = 273
Height = 28
Caption = 'Make Xnews your default newsreader!'
TabOrder = 4
OnClick = bAssocClick
end
end
end
object bOkay: TButton
Left = 386
Top = 428
Width = 86
Height = 27
Caption = 'O&kay'
Default = True
ModalResult = 1
TabOrder = 1
end
object bCancel: TButton
Left = 495
Top = 428
Width = 86
Height = 27
Cancel = True
Caption = '&Cancel'
ModalResult = 2
TabOrder = 2
end
object FontDialog: TFontDialog
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MinFontSize = 0
MaxFontSize = 0
Left = 280
Top = 424
end
object ColorDialog: TColorDialog
Ctl3D = True
Left = 328
Top = 424
end
object OpenDialog: TOpenDialog
Left = 240
Top = 424
end
end