inherited fOptions: TfOptions Left = 503 Top = 287 BorderStyle = bsDialog Caption = 'Settings' ClientHeight = 293 ClientWidth = 403 OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object SubPanel: TPanel [0] Left = 0 Top = 262 Width = 403 Height = 31 Align = alBottom BevelOuter = bvNone TabOrder = 0 object ModalPanel: TPanel Left = 140 Top = 0 Width = 263 Height = 31 Align = alRight BevelOuter = bvNone TabOrder = 0 object Button1: TButton Left = 9 Top = 2 Width = 75 Height = 22 Caption = '&OK' Default = True TabOrder = 0 OnClick = Button1Click end object Button2: TButton Left = 94 Top = 2 Width = 75 Height = 22 Caption = '&Cancel' ModalResult = 2 TabOrder = 1 end object Button3: TButton Left = 180 Top = 2 Width = 75 Height = 22 Caption = '&Apply' TabOrder = 2 OnClick = Button3Click end end end object Panel2: TPanel [1] Left = 0 Top = 0 Width = 403 Height = 262 Align = alClient BevelOuter = bvNone BorderWidth = 8 Caption = 'Panel2' TabOrder = 1 object Pagecontrol1: TPageControl Left = 8 Top = 8 Width = 387 Height = 246 ActivePage = TabSheet1 Align = alClient TabOrder = 0 object TabSheet1: TTabSheet Caption = 'General' object GroupBox1: TGroupBox Left = 10 Top = 5 Width = 356 Height = 199 Caption = 'Settings' TabOrder = 0 object Label2: TLabel Left = 21 Top = 38 Width = 175 Height = 13 Alignment = taRightJustify Caption = 'Path to Autoexec.bat and Config.sys:' end object Label3: TLabel Left = 61 Top = 70 Width = 135 Height = 13 Alignment = taRightJustify Caption = 'Text for registry default-keys:' end object DefaultEmpty: TLabel Left = 100 Top = 102 Width = 96 Height = 13 Alignment = taRightJustify Caption = 'empty registry value:' end object pathtosystemfilesEDT: TEdit Left = 198 Top = 35 Width = 140 Height = 21 TabOrder = 0 Text = 'C:\' end object DefaultTextEDT: TEdit Left = 198 Top = 67 Width = 140 Height = 21 TabOrder = 1 Text = '(default)' end object EmptyTextEDT: TEdit Left = 198 Top = 99 Width = 140 Height = 21 TabOrder = 2 Text = '(empty)' end end end object ViewSheet: TTabSheet Caption = 'View' object GroupBox2: TGroupBox Left = 10 Top = 5 Width = 357 Height = 199 Caption = 'View settings' TabOrder = 0 object Label1: TLabel Left = 121 Top = 53 Width = 81 Height = 13 Alignment = taRightJustify Caption = 'color of the hints:' end object HintcolorSHP: TShape Left = 210 Top = 49 Width = 93 Height = 20 Brush.Color = clInfoBk Shape = stRoundRect OnMouseUp = HintcolorSHPMouseUp end object Label4: TLabel Left = 93 Top = 79 Width = 109 Height = 13 Alignment = taRightJustify Caption = 'color of the captionbar:' end object CaptionColorSHP: TShape Left = 210 Top = 75 Width = 93 Height = 20 Brush.Color = clBlack Shape = stRoundRect OnMouseUp = CaptionColorSHPMouseUp end object Label5: TLabel Left = 23 Top = 157 Width = 244 Height = 26 Caption = 'Some of the changes will be availabe after the next start' WordWrap = True end object Label6: TLabel Left = 48 Top = 106 Width = 154 Height = 13 Alignment = taRightJustify Caption = 'fontcolor of the Taskbar (active):' end object CaptionTextActiveSHP: TShape Left = 210 Top = 102 Width = 93 Height = 20 Brush.Color = clBlack Shape = stRoundRect OnMouseUp = CaptionTextActiveSHPMouseUp end object Label7: TLabel Left = 40 Top = 132 Width = 162 Height = 13 Alignment = taRightJustify Caption = 'fontcolor of the Taskbar (inactive):' end object CaptionTextInActiveSHP: TShape Left = 210 Top = 128 Width = 93 Height = 20 Brush.Color = clBlack Shape = stRoundRect OnMouseUp = CaptionTextInActiveSHPMouseUp end object ShowHintsCB: TCheckBox Left = 231 Top = 24 Width = 70 Height = 17 Alignment = taLeftJustify Caption = 'show hints' TabOrder = 0 end end end object TabSheet3: TTabSheet Caption = 'Delete' object GroupBox3: TGroupBox Left = 11 Top = 5 Width = 357 Height = 199 Caption = 'delete-settings' TabOrder = 0 object RecycleCB: TCheckBox Left = 16 Top = 36 Width = 296 Height = 17 Caption = 'move the deleted files to recycle-bin' TabOrder = 0 OnClick = RecycleCBClick end object BackupFilesCB: TCheckBox Left = 16 Top = 62 Width = 282 Height = 17 Caption = 'Backup files to directory' TabOrder = 1 OnClick = BackupFilesCBClick end object BackupDirEDT: TEdit Left = 16 Top = 92 Width = 285 Height = 21 TabOrder = 2 end object ChooseDirBTN: TButton Left = 304 Top = 92 Width = 21 Height = 22 Hint = 'browse folder' Caption = '...' TabOrder = 3 OnClick = ChooseDirBTNClick end end end end end inherited MSOfficeCaption1: TMSOfficeCaption CaptionText.Caption = 'Settings' end object BrowseDirectoryDlg1: TBrowseDirectoryDlg Title = 'Backuppath for deleted files' Root = idDrives Options = [bfDirectoriesOnly] StatusText = 'Folder to store the deleted files' EnableOKButton = True Left = 327 Top = 92 end object ColorDialog1: TColorDialog Ctl3D = True Options = [cdFullOpen, cdAnyColor] Left = 356 Top = 92 end end