home *** CD-ROM | disk | FTP | other *** search
- object DeskPropDlg: TDeskPropDlg
- Left = 197
- Top = 115
- HelpContext = 51
- ActiveControl = OKBtn
- BorderStyle = bsDialog
- Caption = 'Desktop Properties'
- ClientHeight = 335
- ClientWidth = 317
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- PixelsPerInch = 96
- Position = poScreenCenter
- OnCreate = FormCreate
- TextHeight = 13
- object OKBtn: TBitBtn
- Left = 74
- Top = 304
- Width = 77
- Height = 27
- TabOrder = 1
- OnClick = OKBtnClick
- Kind = bkOK
- Margin = 4
- Style = bsNew
- Spacing = -1
- IsControl = True
- end
- object CancelBtn: TBitBtn
- Left = 154
- Top = 304
- Width = 77
- Height = 27
- TabOrder = 2
- Kind = bkCancel
- Margin = 4
- Style = bsNew
- Spacing = -1
- IsControl = True
- end
- object Notebook: TTabbedNotebook
- Left = 4
- Top = 0
- Width = 309
- Height = 301
- TabFont.Color = clBtnText
- TabFont.Height = -11
- TabFont.Name = 'MS Sans Serif'
- TabFont.Style = []
- TabOrder = 0
- object TTabPage
- Left = 5
- Top = 26
- Caption = 'General'
- object Label1: TLabel
- Left = 10
- Top = 100
- Width = 69
- Height = 13
- Caption = '&Preferences'
- FocusControl = CheckList
- end
- object CheckList: TCheckList
- Left = 10
- Top = 116
- Width = 279
- Height = 142
- Color = clBtnFace
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- IntegralHeight = True
- ItemHeight = 20
- Items.Strings = (
- 'Automatically resize icon windows to fit contents'
- 'Move and resize windows using hollow boxes'
- 'Save open browser windows between sessions'
- 'Display arrow symbols next to shortcuts'
- 'Animate cursor when dragging files over desktop'
- 'Right-click on wallpaper to popup desktop menu'
- 'Align attached icon windows with Explorer'
- 'Ask for confirmation before deleting a shortcut'
- 'Only move shortcuts when caption is dragged'
- 'Activate shortcuts after a single mouse click'
- 'Browse through folders in the same icon window'
- 'Right click on minimize/maximize box to close')
- ParentFont = False
- TabOrder = 1
- end
- object Placement: TRadioGroup
- Left = 10
- Top = 8
- Width = 279
- Height = 87
- Caption = 'Place new icon windows'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Items.Strings = (
- '&Cascaded from the previous one'
- '&Randomly on the desktop'
- 'In the &same location the folder was last shown')
- ParentFont = False
- TabOrder = 0
- end
- end
- end
- object HelpBtn: TBitBtn
- Left = 234
- Top = 304
- Width = 77
- Height = 27
- TabOrder = 3
- Kind = bkHelp
- Margin = 4
- Style = bsNew
- Spacing = -1
- end
- end
-