home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 1999 July
/
PCWorld_1999-07_cd.bin
/
software
/
Servis
/
Sytinem
/
SYTINEM.EXE
/
0
/
RCDATA
/
TSETTINGSFORM
/
TSETTINGSFORM.txt
Wrap
Text File
|
1998-08-31
|
15KB
|
520 lines
object SettingsForm: TSettingsForm
Left = 227
Top = 152
ActiveControl = OKGradBtn
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = 'SyTinem: Settings'
ClientHeight = 328
ClientWidth = 385
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = []
ShowHint = True
OnCreate = FormCreate
Version = 'TGradientForm v1.60'
UseWin98Gradient = True
PixelsPerInch = 96
TextHeight = 13
object CancelGradBtn: TGradBtn
Left = 306
Top = 302
Width = 75
Height = 22
Hint = 'Lose changes and exit'
BtnHiliteClr = clWhite
BtnShadowClr = clBlack
BeginColor = 13553358
EndColor = 6250335
GradientStyle = gsVertical
TextStyle = tsInset
TextShadeType = stHeavy
Presets = Aluminum
Caption = 'Cancel'
OnClick = CancelGradBtnClick
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Verdana'
Font.Style = [fsBold]
TabOrder = 1
TabStop = True
end
object OKGradBtn: TGradBtn
Left = 226
Top = 302
Width = 75
Height = 22
Hint = 'Save changes and exit'
BtnHiliteClr = clWhite
BtnShadowClr = clBlack
BeginColor = 13553358
EndColor = 6250335
GradientStyle = gsVertical
TextStyle = tsInset
TextShadeType = stHeavy
Presets = Aluminum
Caption = 'OK'
OnClick = OKGradBtnClick
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Verdana'
Font.Style = [fsBold]
TabOrder = 0
TabStop = True
end
object PageControl: TPageControl
Left = 4
Top = 4
Width = 377
Height = 293
ActivePage = ConnectionTabSheet
TabOrder = 2
object NewMailTabSheet: TTabSheet
Caption = 'New mail'
object MailServersLabel: TLabel
Left = 0
Top = 0
Width = 84
Height = 13
Caption = '&Mail servers:'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = [fsBold]
ParentFont = False
end
object NewMailNotificationLabel: TLabel
Left = 0
Top = 136
Width = 141
Height = 13
Caption = 'New mail notification:'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = [fsBold]
ParentFont = False
end
object FirstBevel: TBevel
Left = 0
Top = 132
Width = 369
Height = 9
Shape = bsTopLine
end
object MailServersListView: TListView
Left = 0
Top = 16
Width = 369
Height = 89
Hint = 'Mail servers to poll for new mail'
ColumnClick = False
Columns = <
item
Caption = 'Server Name'
Width = 100
end
item
Caption = 'Username'
Width = 75
end
item
Caption = 'POP3 Server'
Width = 120
end
item
Caption = 'Interval'
Width = 60
end>
HideSelection = False
HotTrack = True
MultiSelect = True
RowSelect = True
OnChange = MailServersListViewChange
OnDeletion = MailServersListViewDeletion
SortType = stText
TabOrder = 0
ViewStyle = vsReport
SmallImages = ImageList
end
object EditGradBtn: TGradBtn
Left = 214
Top = 108
Width = 75
Height = 22
Hint = 'Edit the current mail server entry'
BtnHiliteClr = clWhite
BtnShadowClr = clBlack
BeginColor = 13553358
EndColor = 6250335
GradientStyle = gsVertical
TextStyle = tsInset
TextShadeType = stHeavy
Presets = Aluminum
Caption = 'Edit'
OnClick = EditGradBtnClick
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Verdana'
Font.Style = [fsBold]
TabOrder = 1
TabStop = True
end
object RemoveGradBtn: TGradBtn
Left = 294
Top = 108
Width = 75
Height = 22
Hint = 'Remove all selected mail server entries'
BtnHiliteClr = clWhite
BtnShadowClr = clBlack
BeginColor = 13553358
EndColor = 6250335
GradientStyle = gsVertical
TextStyle = tsInset
TextShadeType = stHeavy
Presets = Aluminum
Caption = 'Remove'
OnClick = RemoveGradBtnClick
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Verdana'
Font.Style = [fsBold]
TabOrder = 2
TabStop = True
end
object NewGradBtn: TGradBtn
Left = 134
Top = 108
Width = 75
Height = 22
Hint = 'Create a new mail server entry'
BtnHiliteClr = clWhite
BtnShadowClr = clBlack
BeginColor = 13553358
EndColor = 6250335
GradientStyle = gsVertical
TextStyle = tsInset
TextShadeType = stHeavy
Presets = Aluminum
Caption = 'New'
OnClick = NewGradBtnClick
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Verdana'
Font.Style = [fsBold]
TabOrder = 3
TabStop = True
end
object DisplayMessageCheckBox: TCheckBox
Left = 8
Top = 154
Width = 129
Height = 17
Hint = 'Display a message if new mail is found'
Caption = 'Display a &message'
State = cbChecked
TabOrder = 4
OnClick = DisplayMessageCheckBoxClick
end
object PlaySoundCheckBox: TCheckBox
Left = 8
Top = 202
Width = 97
Height = 17
Hint = 'Play a wave file'
Caption = '&Play sound'
TabOrder = 5
OnClick = PlaySoundCheckBoxClick
end
object AutoHideCheckbox: TCheckBox
Left = 144
Top = 154
Width = 169
Height = 17
Hint = 'Automaticly hide the message afther 3 seconds'
Caption = 'Auto &hide after 3 seconds'
State = cbChecked
TabOrder = 6
end
object SoundEdit: TEdit
Left = 128
Top = 200
Width = 161
Height = 21
Hint = 'Enter the filename of the wavefile to play'
Enabled = False
TabOrder = 7
end
object SystemBeepCheckbox: TCheckBox
Left = 8
Top = 178
Width = 97
Height = 17
Hint = 'Play some beeps on the system speaker'
Caption = 'System &beep'
State = cbChecked
TabOrder = 8
end
object StartMailClientCheckbox: TCheckBox
Left = 8
Top = 226
Width = 113
Height = 17
Hint = 'Start your favorite mail client'
Caption = 'Start mail &client:'
TabOrder = 9
OnClick = StartMailClientCheckboxClick
end
object MailClientEdit: TEdit
Left = 128
Top = 224
Width = 161
Height = 21
Hint = 'Filename of your favorite mail client'
Enabled = False
TabOrder = 10
end
object BrowseSoundGradBtn: TGradBtn
Left = 294
Top = 200
Width = 75
Height = 22
Hint = 'Browse for a wave file'
BtnHiliteClr = clWhite
BtnShadowClr = clBlack
BeginColor = 13553358
EndColor = 6250335
GradientStyle = gsVertical
TextStyle = tsInset
TextShadeType = stHeavy
Presets = Aluminum
Caption = 'Browse'
OnClick = BrowseSoundGradBtnClick
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Verdana'
Font.Style = [fsBold]
TabOrder = 11
TabStop = True
end
object BrowseClientGradBtn: TGradBtn
Left = 294
Top = 223
Width = 75
Height = 22
Hint = 'Browse for a mail client'
BtnHiliteClr = clWhite
BtnShadowClr = clBlack
BeginColor = 13553358
EndColor = 6250335
GradientStyle = gsVertical
TextStyle = tsInset
TextShadeType = stHeavy
Presets = Aluminum
Caption = 'Browse'
OnClick = BrowseClientGradBtnClick
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Verdana'
Font.Style = [fsBold]
TabOrder = 12
TabStop = True
end
end
object TimeTabSheet: TTabSheet
Caption = 'Time synchronization'
object TimeServerLabel: TLabel
Left = 26
Top = 36
Width = 74
Height = 13
Caption = '&Time server:'
FocusControl = TimeServersComboBox
end
object SynchronizeCheckBox: TCheckBox
Left = 8
Top = 8
Width = 121
Height = 17
Hint =
'Enable to synchronize your local time with a timeserver on the i' +
'nternet'
Caption = '&Synchronize time'
TabOrder = 0
OnClick = SynchronizeCheckBoxClick
end
object TimeServersComboBox: TComboBox
Left = 104
Top = 32
Width = 161
Height = 21
Hint = 'Hostname of the timeserver to synchronize with'
ItemHeight = 13
Items.Strings = (
'tick.service.uit.no'
'chime1.surfnet.nl'
'swisstime.ethz.ch'
'tick.usno.navy.mil'
'clock.psu.edu'
'time.nist.gov'
'ntp.syd.dms.csiro.au'
'ntps1-0.cs.tu-berlin.de'
'ntp.ctr.columbia.edu'
'ntp.css.gov'
'ntp0.cornell.edu'
'clock.isc.org')
TabOrder = 1
end
object IntervalRadioGroup: TRadioGroup
Left = 8
Top = 60
Width = 353
Height = 65
Hint = 'Synchronize every hour or once a day'
Caption = ' Interval '
ItemIndex = 0
Items.Strings = (
'H&ourly'
'&Daily')
TabOrder = 2
end
end
object ConnectionTabSheet: TTabSheet
Caption = 'Connection'
object FirewallLabel: TLabel
Left = 4
Top = 180
Width = 56
Height = 13
Caption = 'Firewall:'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = [fsBold]
ParentFont = False
end
object FirewallDescLabel: TLabel
Left = 4
Top = 196
Width = 354
Height = 65
AutoSize = False
Caption =
'If you'#39're computer connects to the internet using a firewall, as' +
'k your local administrators, make sure that tcp-ports 110 (POP3)' +
' and 37 (Time) are available and allow bidirectional outgoing co' +
'nnections.'
WordWrap = True
end
object ActiveWithRASLabel: TLabel
Left = 30
Top = 56
Width = 327
Height = 29
AutoSize = False
Caption =
'Only check mail and synchronize time when the following RAS conn' +
'ection is active:'
WordWrap = True
end
object ConnectionLANRadioButton: TRadioButton
Left = 12
Top = 16
Width = 249
Height = 17
Hint = 'Try to reach the internet using the LAN connection'
Caption = 'I use a &LAN to connect to the internet'
Checked = True
TabOrder = 0
TabStop = True
OnClick = ConnectionLANRadioButtonClick
end
object ConnectionRASRadioButton: TRadioButton
Left = 12
Top = 36
Width = 233
Height = 17
Hint =
'Select the RAS connection that must be active to reach the inter' +
'net'
Caption = 'I use &RAS to connect to the internet'
TabOrder = 1
OnClick = ConnectionRASRadioButtonClick
end
object RASEntriesComboBox: TComboBox
Left = 28
Top = 84
Width = 329
Height = 21
Hint = 'List of available RAS entries.'
Style = csDropDownList
Enabled = False
ItemHeight = 13
Sorted = True
TabOrder = 2
end
end
end
object ImageList: TImageList
Left = 8
Top = 296
Bitmap = {
4202000001000000424D42020000000000004200000028000000100000001000
000001001000030000000002000000000000000000000000000000000000007C
0000E00300001F00000000000000000000000000000000000000000000000000
0000000000000000000010421042104210421042104210421042104210421042
104210421042000000001042FF7F186318631863186318631863186318631863
186318631042104200001042FF7F1863E0030002186318630000000000000000
000018631042104200001042FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
FF7FFF7F10421042000000000000000000000000000000000000000000000000
0000000010421042000000001042104210421042104210421042104210421042
1042104200001042000000001042186318631863186318631863186318631863
1863186310420000000000001042FF7F18631000100010001000100010001000
1863186310420000000000001042FF7F186310001F001F001F001F001F001000
1863186310420000000000001042FF7F1863100018631F001F001F001F001000
1863186310420000000000001042FF7F18631000FF0318631F001F001F001000
1863186310420000000000001042FF7F18631000100010001000100010001000
1863186310420000000000001042FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
FF7F186310420000000000000000104218631863186318631863186318631863
1863186310420000000000000000000010421042104210421042104210421042
10421042104200000000424D7E000000000000003E0000002800000010000000
1000000001000100000000004000000000000000000000000200000002000000
00000000FFFFFF00800300000001000000000000000000000000000080000000
8001000080010000800100008001000080010000800100008001000080010000
C0010000E0030000}
end
object WaveFileOpenDialog: TOpenDialog
DefaultExt = 'wav'
Filter = 'Wave files|*.wav|All Files|*.*'
Options = [ofHideReadOnly, ofFileMustExist]
Title = 'Select a wave file'
Left = 40
Top = 296
end
object MailClientOpenDialog: TOpenDialog
DefaultExt = 'exe'
Filter = 'Executables|*.exe|All Files|*.*'
Options = [ofHideReadOnly, ofFileMustExist]
Title = 'Select mail client executable'
Left = 72
Top = 296
end
end