home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1998 April A
/
Pcwk4a98.iso
/
PROGRAM
/
DELPHI16
/
Calmira
/
Src
/
SRC
/
OPTIONS.DFM
/
OPTIONS.txt
< prev
Wrap
Text File
|
1996-09-14
|
27KB
|
1,210 lines
object OptionDlg: TOptionDlg
Left = 299
Top = 148
HelpContext = 20
ActiveControl = OKBtn
BorderStyle = bsDialog
Caption = 'Options'
ClientHeight = 289
ClientWidth = 430
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
PixelsPerInch = 96
Position = poScreenCenter
ShowHint = True
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
TextHeight = 13
object OKBtn: TBitBtn
Left = 192
Top = 260
Width = 77
Height = 27
TabOrder = 0
OnClick = OKBtnClick
Kind = bkOK
Margin = 2
Style = bsNew
Spacing = -1
IsControl = True
end
object CancelBtn: TBitBtn
Left = 272
Top = 260
Width = 77
Height = 27
TabOrder = 1
OnClick = CancelBtnClick
Kind = bkCancel
Margin = 2
Style = bsNew
Spacing = -1
IsControl = True
end
object Notebook: TTabbedNotebook
Left = 2
Top = 0
Width = 429
Height = 257
HelpContext = 20
PageIndex = 3
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
TabsPerRow = 4
TabFont.Color = clBlack
TabFont.Height = -11
TabFont.Name = 'MS Sans Serif'
TabFont.Style = []
TabOrder = 2
OnChange = NotebookChange
object TTabPage
Left = 5
Top = 45
HelpContext = 20
Caption = 'Browser'
object Bevel6: TBevel
Left = 210
Top = 8
Width = 193
Height = 191
end
object Bevel5: TBevel
Left = 8
Top = 8
Width = 193
Height = 191
end
object Label1: TLabel
Left = 20
Top = 78
Width = 25
Height = 13
Caption = '&Filter:'
FocusControl = FilterEdit
end
object DelayLabel: TLabel
Left = 232
Top = 66
Width = 138
Height = 13
Caption = 'D&elay (from 0.5 to 3 seconds)'
FocusControl = Delay
end
object Label8: TLabel
Left = 20
Top = 124
Width = 101
Height = 13
Caption = 'Files containing &icons'
FocusControl = IconEdit
end
object Label21: TLabel
Left = 20
Top = 14
Width = 71
Height = 13
Caption = 'Default sorting:'
end
object FilterEdit: TEdit
Left = 20
Top = 94
Width = 165
Height = 20
Cursor = crIBeam
CharCase = ecLowerCase
MaxLength = 12
TabOrder = 4
Text = '*.*'
end
object cbShowHidSys: TCheckBox
Left = 22
Top = 166
Width = 141
Height = 25
Caption = 'Show &hidden/system files'
TabOrder = 6
end
object cbFileHints: TCheckBox
Left = 234
Top = 38
Width = 97
Height = 17
Caption = 'Sh&ow file hints'
TabOrder = 8
end
object IconEdit: TEdit
Left = 20
Top = 140
Width = 165
Height = 20
Cursor = crIBeam
CharCase = ecUpperCase
MaxLength = 31
TabOrder = 5
end
object rbType: TRadioButton
Left = 20
Top = 32
Width = 53
Height = 17
Caption = '&Type'
Checked = True
TabOrder = 0
TabStop = True
end
object rbName: TRadioButton
Left = 20
Top = 54
Width = 59
Height = 17
Caption = '&Name'
TabOrder = 1
end
object rbDate: TRadioButton
Left = 98
Top = 54
Width = 61
Height = 17
Caption = '&Date'
TabOrder = 3
end
object rbSize: TRadioButton
Left = 98
Top = 32
Width = 83
Height = 17
Caption = '&Size'
TabOrder = 2
end
object Delay: TScrollBar
Left = 232
Top = 84
Width = 147
Height = 17
LargeChange = 100
Max = 3000
Min = 500
Position = 1000
SmallChange = 10
TabOrder = 9
end
object cbShowList: TCheckBox
Left = 234
Top = 14
Width = 109
Height = 17
Caption = 'Show files as &list'
TabOrder = 7
end
object Panel1: TPanel
Left = 224
Top = 104
Width = 173
Height = 85
BevelOuter = bvNone
TabOrder = 10
object rbStandard: TRadioButton
Left = 8
Top = 16
Width = 157
Height = 17
Caption = 'Use normal DOS filenames'
Checked = True
TabOrder = 0
TabStop = True
end
object rb4DOS: TRadioButton
Left = 8
Top = 40
Width = 141
Height = 17
Caption = 'Load 4DOS descriptions'
TabOrder = 1
end
object rbExtended: TRadioButton
Left = 8
Top = 64
Width = 161
Height = 17
Caption = 'Use descriptions for captions'
TabOrder = 2
end
end
end
object TTabPage
Left = 5
Top = 45
HelpContext = 21
Caption = 'Confirmation'
object Bevel7: TBevel
Left = 8
Top = 8
Width = 193
Height = 191
end
object Bevel8: TBevel
Left = 210
Top = 8
Width = 193
Height = 191
end
object Label17: TLabel
Left = 22
Top = 14
Width = 54
Height = 13
Caption = 'Ask before:'
end
object Label18: TLabel
Left = 214
Top = 16
Width = 157
Height = 13
Caption = 'Respond to external file drops by:'
end
object Replace: TCheckBox
Left = 22
Top = 79
Width = 101
Height = 17
Caption = '&Replacing a file'
TabOrder = 2
end
object FileDelete: TCheckBox
Left = 22
Top = 30
Width = 121
Height = 17
Caption = '&Deleting files'
TabOrder = 0
end
object Move: TCheckBox
Left = 22
Top = 127
Width = 81
Height = 17
Caption = '&Moving files'
TabOrder = 4
end
object Copy: TCheckBox
Left = 22
Top = 103
Width = 89
Height = 17
Caption = '&Copying files'
TabOrder = 3
end
object FolderDelete: TCheckBox
Left = 22
Top = 54
Width = 101
Height = 17
Caption = 'Deleting &folders'
TabOrder = 1
end
object Protect: TCheckBox
Left = 22
Top = 152
Width = 163
Height = 17
Caption = 'Deleting/moving &protected file'
TabOrder = 5
end
object rbCopy: TRadioButton
Left = 228
Top = 38
Width = 119
Height = 17
Caption = 'C&opying dropped files'
Checked = True
TabOrder = 6
TabStop = True
end
object rbMove: TRadioButton
Left = 228
Top = 62
Width = 121
Height = 17
Caption = 'Mo&ving dropped files'
TabOrder = 7
end
object rbPrompt: TRadioButton
Left = 228
Top = 86
Width = 113
Height = 17
Caption = 'Promp&ting for action'
TabOrder = 8
end
object cbRemoveShort: TCheckBox
Left = 22
Top = 176
Width = 131
Height = 17
Caption = 'Removing a &shortcut'
TabOrder = 9
end
object cbPromptQuit: TCheckBox
Left = 226
Top = 149
Width = 141
Height = 17
Caption = 'Prompt before q&uitting'
TabOrder = 11
end
object cbConfirmAlias: TCheckBox
Left = 226
Top = 124
Width = 137
Height = 17
Caption = 'Confirm new &alias name'
TabOrder = 10
end
end
object TTabPage
Left = 5
Top = 45
HelpContext = 22
Caption = 'Desktop'
object Bevel2: TBevel
Left = 210
Top = 8
Width = 193
Height = 191
end
object Bevel1: TBevel
Left = 8
Top = 8
Width = 193
Height = 191
end
object Label15: TLabel
Left = 224
Top = 150
Width = 111
Height = 13
Caption = 'S&ystem window caption'
FocusControl = SysEdit
end
object Label16: TLabel
Left = 224
Top = 104
Width = 53
Height = 13
Caption = 'B&in caption'
FocusControl = BinEdit
end
object Label22: TLabel
Left = 222
Top = 14
Width = 116
Height = 13
Caption = 'New window placement:'
end
object cbAutoSize: TCheckBox
Left = 20
Top = 16
Width = 137
Height = 17
Caption = 'Size &new windows to fit'
TabOrder = 0
end
object cbAutoActivate: TCheckBox
Left = 20
Top = 42
Width = 169
Height = 17
Caption = '&Activate window under cursor'
TabOrder = 1
end
object cbBrowseSame: TCheckBox
Left = 20
Top = 68
Width = 165
Height = 17
Caption = '&Browse folder in same window'
TabOrder = 2
end
object cbShortArrows: TCheckBox
Left = 20
Top = 94
Width = 147
Height = 17
Caption = 'Display s&hortcut arrows'
TabOrder = 3
end
object cbHollowDrag: TCheckBox
Left = 20
Top = 146
Width = 167
Height = 17
Caption = 'Hollow &window moving/resizing'
TabOrder = 5
end
object cbSaveWindows: TCheckBox
Left = 20
Top = 172
Width = 149
Height = 17
Caption = 'Save &open icon windows'
TabOrder = 6
end
object SysEdit: TEdit
Left = 224
Top = 167
Width = 169
Height = 20
Cursor = crIBeam
MaxLength = 31
TabOrder = 10
end
object BinEdit: TEdit
Left = 224
Top = 121
Width = 169
Height = 20
Cursor = crIBeam
MaxLength = 31
TabOrder = 11
end
object rbCascaded: TRadioButton
Left = 228
Top = 34
Width = 137
Height = 17
Caption = '&Cascaded from previous'
Checked = True
TabOrder = 7
TabStop = True
end
object rbRandom: TRadioButton
Left = 228
Top = 55
Width = 113
Height = 17
Caption = '&Random'
TabOrder = 8
end
object rbSaved: TRadioButton
Left = 228
Top = 76
Width = 143
Height = 17
Caption = '&Saved from last opening'
TabOrder = 9
end
object cbAliasArrows: TCheckBox
Left = 20
Top = 120
Width = 121
Height = 17
Caption = 'Display &alias arrows'
TabOrder = 4
end
end
object TTabPage
Left = 5
Top = 45
HelpContext = 23
Caption = 'Start menu'
object AddBtn: TStyleSpeed
Left = 322
Top = 8
Width = 77
Height = 27
Caption = 'Add'
OnClick = AddBtnClick
Style = sbBitBtn
end
object InsertBtn: TStyleSpeed
Left = 322
Top = 40
Width = 77
Height = 27
Caption = 'Insert'
OnClick = InsertBtnClick
Style = sbBitBtn
end
object EditBtn: TStyleSpeed
Left = 322
Top = 72
Width = 77
Height = 27
Caption = 'Edit'
OnClick = EditBtnClick
Style = sbBitBtn
end
object DeleteBtn: TStyleSpeed
Left = 322
Top = 104
Width = 77
Height = 27
Caption = 'Delete'
OnClick = DeleteBtnClick
Style = sbBitBtn
end
object ExpandBtn: TStyleSpeed
Left = 322
Top = 136
Width = 77
Height = 27
Caption = 'Expand'
OnClick = ExpandBtnClick
Style = sbBitBtn
end
object CollapseBtn: TStyleSpeed
Left = 322
Top = 168
Width = 77
Height = 27
Caption = 'Collapse'
OnClick = CollapseBtnClick
Style = sbBitBtn
end
object Outline: TOutline
Left = 8
Top = 10
Width = 305
Height = 189
Style = otOwnerDraw
ItemHeight = 16
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
TabOrder = 0
OnDragDrop = OutlineDragDrop
OnDragOver = OutlineDragOver
OnEndDrag = OutlineEndDrag
OnMouseDown = OutlineMouseDown
ItemSeparator = '\'
PictureOpen.Data = {<image000.unknown>}
PictureClosed.Data = {<image001.unknown>}
PictureLeaf.Data = {<image002.unknown>}
ParentFont = False
PopupMenu = OutlineMenu
Data = {1F}
end
end
object TTabPage
Left = 5
Top = 45
HelpContext = 24
Caption = 'Display'
object ChangeFont: TStyleSpeed
Left = 210
Top = 20
Width = 193
Height = 25
Caption = 'Change &font...'
OnClick = ChangeFontClick
Style = sbBitBtn
end
object Label2: TLabel
Left = 12
Top = 6
Width = 74
Height = 13
Caption = 'Screen &element'
FocusControl = Element
end
object Label13: TLabel
Left = 16
Top = 150
Width = 89
Height = 13
Caption = 'Icon spacing &width'
end
object Label14: TLabel
Left = 16
Top = 180
Width = 93
Height = 13
Caption = 'Icon spacing &height'
end
object CustomColor: TStyleSpeed
Left = 70
Top = 100
Width = 127
Height = 25
Caption = 'C&ustom colour...'
Enabled = False
OnClick = CustomColorClick
Style = sbBitBtn
end
object Label3: TLabel
Left = 14
Top = 50
Width = 30
Height = 13
Caption = '&Colour'
FocusControl = ColorPick
end
object Shape: TShape
Left = 10
Top = 100
Width = 49
Height = 25
end
object Bevel13: TBevel
Left = 9
Top = 99
Width = 51
Height = 27
end
object Element: TComboBox
Left = 10
Top = 22
Width = 187
Height = 20
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
OnChange = ElementChange
end
object BrowseXEdit: TSpinEdit
Left = 134
Top = 146
Width = 61
Height = 22
Cursor = crIBeam
MaxLength = 3
MaxValue = 128
MinValue = 8
TabOrder = 2
Value = 8
OnChange = BrowseXEditChange
end
object BrowseYEdit: TSpinEdit
Left = 134
Top = 176
Width = 61
Height = 22
Cursor = crIBeam
MaxLength = 3
MaxValue = 128
MinValue = 8
TabOrder = 3
Value = 8
OnChange = BrowseXEditChange
end
object ColorPick: TComboBox
Left = 10
Top = 66
Width = 187
Height = 20
Style = csDropDownList
Enabled = False
ItemHeight = 13
TabOrder = 1
OnChange = ColorPickChange
end
object SamplePanel: TPanel
Left = 210
Top = 54
Width = 191
Height = 145
BevelInner = bvLowered
BorderWidth = 3
BorderStyle = bsSingle
Caption = 'SamplePanel'
TabOrder = 4
object PaintBox: TPaintBox
Left = 5
Top = 5
Width = 179
Height = 133
OnPaint = PaintBoxPaint
end
end
end
object TTabPage
Left = 5
Top = 45
HelpContext = 25
Caption = 'Preferences'
object Bevel3: TBevel
Left = 8
Top = 8
Width = 193
Height = 191
end
object Bevel4: TBevel
Left = 210
Top = 8
Width = 195
Height = 191
end
object cbProgDrop: TCheckBox
Left = 22
Top = 146
Width = 161
Height = 17
Caption = 'Drop files into &programs'
TabOrder = 5
end
object cbAnimCursor: TCheckBox
Left = 22
Top = 120
Width = 163
Height = 17
Caption = '&Animated drag-drop cursor'
TabOrder = 4
end
object cbFindVersion: TCheckBox
Left = 22
Top = 42
Width = 165
Height = 17
Caption = 'Find &version information'
TabOrder = 1
end
object cbShowGlyphs: TCheckBox
Left = 22
Top = 68
Width = 157
Height = 17
Caption = 'Show &icons in search box'
TabOrder = 2
end
object cbShowSplash: TCheckBox
Left = 22
Top = 16
Width = 133
Height = 17
Caption = 'Display &splash screen'
TabOrder = 0
end
object cbClearSearch: TCheckBox
Left = 22
Top = 94
Width = 157
Height = 17
Caption = '&Clear search results on close'
TabOrder = 3
end
object cbTaskbar: TCheckBox
Left = 224
Top = 16
Width = 161
Height = 17
Caption = 'Load and unload &taskbar.exe'
TabOrder = 6
end
object cbRestoreSys: TCheckBox
Left = 224
Top = 42
Width = 169
Height = 17
Caption = '&Restore system window on load'
TabOrder = 7
end
object cbRefreshShort: TCheckBox
Left = 224
Top = 94
Width = 173
Height = 17
Caption = 'R&efresh shortcut/alias windows'
TabOrder = 8
end
object cbAlwaysStart: TCheckBox
Left = 224
Top = 119
Width = 147
Height = 17
Caption = 'Always run Startup &group'
TabOrder = 9
end
object cbNewStart: TCheckBox
Left = 224
Top = 145
Width = 135
Height = 17
Caption = 'New style Start &menu'
TabOrder = 10
end
object cbSysWinQuit: TCheckBox
Left = 224
Top = 68
Width = 177
Height = 17
Caption = 'Quit on system window close'
TabOrder = 11
end
object cbMsgSounds: TCheckBox
Left = 22
Top = 172
Width = 163
Height = 17
Caption = 'Play system message sounds'
TabOrder = 12
end
object cbShowDeskMenu: TCheckBox
Left = 224
Top = 172
Width = 161
Height = 17
Caption = 'Enable desktop popup menu'
TabOrder = 13
end
end
object TTabPage
Left = 5
Top = 45
HelpContext = 26
Caption = 'Utilities'
object Bevel9: TBevel
Left = 8
Top = 8
Width = 193
Height = 191
end
object Bevel10: TBevel
Left = 210
Top = 8
Width = 193
Height = 191
end
object Label7: TLabel
Left = 224
Top = 12
Width = 84
Height = 13
Caption = '&Undelete program'
FocusControl = UndeleteEdit
end
object Label4: TLabel
Left = 224
Top = 58
Width = 62
Height = 13
Caption = 'File &inspector'
FocusControl = InspectEdit
end
object Label5: TLabel
Left = 224
Top = 104
Width = 68
Height = 13
Caption = 'Default &viewer'
FocusControl = DefaultEdit
end
object Label6: TLabel
Left = 224
Top = 152
Width = 47
Height = 13
Caption = 'Disk &utility'
FocusControl = DiskEdit
end
object KeepFreeLab: TLabel
Left = 20
Top = 144
Width = 112
Height = 13
Caption = 'Megabytes to keep &free'
FocusControl = KeepFreeEdit
end
object InspectEdit: TEdit
Left = 224
Top = 74
Width = 169
Height = 20
Cursor = crIBeam
Hint = 'Double click to browse'
CharCase = ecLowerCase
MaxLength = 79
TabOrder = 7
OnDblClick = UndeleteEditDblClick
end
object UndeleteEdit: TEdit
Left = 224
Top = 28
Width = 169
Height = 20
Cursor = crIBeam
Hint = 'Double click to browse'
CharCase = ecLowerCase
MaxLength = 79
TabOrder = 6
OnDblClick = UndeleteEditDblClick
end
object DefaultEdit: TEdit
Left = 224
Top = 122
Width = 169
Height = 20
Cursor = crIBeam
Hint = 'Double click to browse'
CharCase = ecLowerCase
MaxLength = 79
TabOrder = 8
OnDblClick = UndeleteEditDblClick
end
object DiskEdit: TEdit
Left = 224
Top = 168
Width = 169
Height = 20
Cursor = crIBeam
Hint = 'Double click to browse'
CharCase = ecLowerCase
MaxLength = 79
TabOrder = 9
OnDblClick = UndeleteEditDblClick
end
object cbEnableBin: TCheckBox
Left = 18
Top = 18
Width = 129
Height = 17
Caption = 'Enable &wastepaper bin'
TabOrder = 0
end
object rbLeave: TRadioButton
Left = 18
Top = 42
Width = 113
Height = 17
Caption = '&Leave trash alone'
Checked = True
TabOrder = 1
TabStop = True
OnClick = rbCollectClick
end
object rbEmpty: TRadioButton
Left = 18
Top = 66
Width = 137
Height = 17
Caption = '&Empty bin each session'
TabOrder = 2
OnClick = rbCollectClick
end
object rbDelete: TRadioButton
Left = 18
Top = 90
Width = 141
Height = 17
Caption = 'Immediately &delete files'
TabOrder = 3
OnClick = rbCollectClick
end
object rbCollect: TRadioButton
Left = 18
Top = 114
Width = 167
Height = 19
Caption = '&Maintain specified disk space'
TabOrder = 4
OnClick = rbCollectClick
end
object KeepFreeEdit: TSpinEdit
Left = 20
Top = 164
Width = 113
Height = 22
Cursor = crIBeam
MaxLength = 5
MaxValue = 32767
MinValue = 0
TabOrder = 5
Value = 10
end
end
object TTabPage
Left = 5
Top = 45
HelpContext = 27
Caption = 'Taskbar'
object Bevel12: TBevel
Left = 210
Top = 8
Width = 193
Height = 191
end
object Bevel11: TBevel
Left = 8
Top = 8
Width = 193
Height = 191
end
object Label19: TLabel
Left = 20
Top = 24
Width = 108
Height = 13
Caption = '&Refresh time (seconds)'
FocusControl = RefreshEdit
end
object Label10: TLabel
Left = 220
Top = 14
Width = 117
Height = 13
Caption = 'Programs to be e&xcluded'
FocusControl = ExcludeList
end
object AddExcl: TStyleSpeed
Left = 220
Top = 168
Width = 81
Height = 25
Caption = 'Add'
OnClick = AddExclClick
Style = sbBitBtn
end
object RemoveExcl: TStyleSpeed
Left = 312
Top = 168
Width = 81
Height = 25
Caption = 'Remove'
OnClick = RemoveExclClick
Style = sbBitBtn
end
object cbShrinkMax: TCheckBox
Left = 20
Top = 98
Width = 153
Height = 17
Caption = 'Shrink &maximized windows'
TabOrder = 0
end
object cb24Hour: TCheckBox
Left = 20
Top = 122
Width = 127
Height = 17
Caption = 'Show 24 hour &clock'
TabOrder = 1
end
object RefreshEdit: TSpinEdit
Left = 138
Top = 20
Width = 49
Height = 22
Cursor = crIBeam
MaxLength = 2
MaxValue = 60
MinValue = 1
TabOrder = 4
Value = 5
end
object cbAnimate: TCheckBox
Left = 20
Top = 146
Width = 97
Height = 17
Caption = 'Animated &popup'
TabOrder = 2
end
object cbButtonHint: TCheckBox
Left = 20
Top = 170
Width = 151
Height = 17
Caption = 'Display full caption as &hint'
TabOrder = 3
end
object cbAlwaysVisible: TCheckBox
Left = 20
Top = 50
Width = 97
Height = 17
Caption = 'Always &visible'
TabOrder = 5
end
object cbHighlight: TCheckBox
Left = 20
Top = 74
Width = 125
Height = 17
Caption = 'Highlight &active task'
TabOrder = 6
end
object ExcludeList: TListBox
Left = 220
Top = 32
Width = 173
Height = 127
ItemHeight = 13
TabOrder = 7
end
end
end
object HelpBtn: TBitBtn
Left = 352
Top = 260
Width = 77
Height = 27
HelpContext = 20
TabOrder = 3
Kind = bkHelp
Style = bsNew
end
object OpenDialog: TOpenDialog
Filter = 'Executable files|*.exe *.com|All files|*.*'
Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
Title = 'Select program'
Left = 4
Top = 260
end
object OutlineMenu: TPopupMenu
AutoPopup = False
Left = 36
Top = 260
object AddItem: TMenuItem
Caption = '&Add'
OnClick = AddBtnClick
end
object InsertItem: TMenuItem
Caption = '&Insert'
OnClick = InsertBtnClick
end
object EditItem: TMenuItem
Caption = '&Edit'
OnClick = EditBtnClick
end
object DeleteItem: TMenuItem
Caption = '&Delete'
OnClick = DeleteBtnClick
end
object ExpandItem: TMenuItem
Caption = 'E&xpand'
OnClick = ExpandBtnClick
end
object CollapseItem: TMenuItem
Caption = '&Collapse'
OnClick = CollapseBtnClick
end
object N1: TMenuItem
Caption = '-'
end
object Convert: TMenuItem
Caption = 'Con&vert...'
OnClick = ConvertClick
end
end
object FontDialog: TFontDialog
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
MinFontSize = 6
MaxFontSize = 16
Options = [fdAnsiOnly, fdEffects, fdForceFontExist, fdNoOEMFonts, fdNoVectorFonts, fdLimitSize]
Left = 64
Top = 260
end
object ColorDialog: TColorDialog
Left = 94
Top = 260
end
end
