object Form8: TForm8 Left = 153 Top = 92 HelpContext = 6 ActiveControl = PageControl1 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'WinRescue 95 Preferences' ClientHeight = 310 ClientWidth = 427 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Position = poScreenCenter OnActivate = Form8Activate PixelsPerInch = 96 TextHeight = 13 object Label11: TLabel Left = 16 Top = 40 Width = 97 Height = 41 Alignment = taCenter AutoSize = False Caption = 'To change a file'#39's status, click on it'#39's checkbox.' Transparent = True WordWrap = True end object PageControl1: TPageControl Left = 8 Top = 8 Width = 409 Height = 265 HelpContext = 6 ActivePage = TabSheet1 MultiLine = True TabOrder = 0 object TabSheet1: TTabSheet HelpContext = 6 Caption = 'Backup Preferences' object Label12: TLabel Left = 24 Top = 20 Width = 52 Height = 13 Caption = '&Backup to:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label6: TLabel Left = 280 Top = 20 Width = 70 Height = 13 AutoSize = False Caption = 'Dis&kette Drive:' Enabled = False FocusControl = Edit1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label10: TLabel Left = 24 Top = 99 Width = 34 Height = 13 Caption = '&Target:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label1: TLabel Left = 24 Top = 134 Width = 73 Height = 30 AutoSize = False Caption = 'Which Registry to Backup' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True WordWrap = True end object Label20: TLabel Left = 24 Top = 60 Width = 92 Height = 13 Caption = '&Compression Level:' FocusControl = ComboBox6 end object Label30: TLabel Left = 24 Top = 168 Width = 361 Height = 49 AutoSize = False Caption = 'If Current is checked and Win95 accesses the Registry while it i' + 's being backed up, the backup will be bad. The only way to know' + ' if it is bad is to restore to it. So Previous is preferred, bu' + 't it doesn'#39't include any changes made since Win95 was started.' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Small Fonts' Font.Style = [] ParentFont = False WordWrap = True end object ComboBox5: TComboBox Left = 88 Top = 16 Width = 177 Height = 21 Style = csDropDownList Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'Hard Drive (unlimited backups)' 'Hard Drive (only one backup)' 'Hard Drive (up to 3 backups)' 'Hard Drive (up to 5 backups)' 'Hard Drive (up to 10 backups)' 'Diskette') ParentFont = False TabOrder = 0 OnChange = PreferenceChange end object Edit1: TEdit Left = 354 Top = 16 Width = 15 Height = 21 Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 1 ParentFont = False TabOrder = 1 Text = 'A' end object ComboBox6: TComboBox Left = 128 Top = 56 Width = 241 Height = 21 Style = csDropDownList Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'Do Not Compress' 'Low/Fast Compression' 'Medium Compression' 'High/Slow Compression' 'Higher/Slower Compression' 'Highest/Slowest Compression') ParentFont = False TabOrder = 2 end object TargetEdit: TEdit Left = 72 Top = 96 Width = 281 Height = 21 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 Text = 'TargetEdit' end object Button14: TButton Left = 353 Top = 96 Width = 17 Height = 20 Caption = '...' TabOrder = 4 OnClick = Button14Click end object PreviousRadio1: TRadioButton Left = 112 Top = 140 Width = 105 Height = 17 Caption = '&Previous (safest)' Checked = True Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 TabStop = True OnClick = RadioGroup1Click end object CurrentRadio1: TRadioButton Left = 224 Top = 140 Width = 161 Height = 17 Caption = 'C&urrent (doesn'#39't always work)' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 6 OnClick = RadioGroup1Click end end object TabSheet6: TTabSheet Caption = 'Restore Preferences' object Label21: TLabel Left = 16 Top = 8 Width = 369 Height = 25 Alignment = taCenter AutoSize = False Caption = 'The Options below determine which backups WinRescue will use to ' + 'restore.' WordWrap = True end object Label18: TLabel Left = 216 Top = 74 Width = 169 Height = 39 AutoSize = False Caption = 'Permanent backups made by WinRescue. These include all specifie' + 'd files, folders, and MultiFile groups.' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Small Fonts' Font.Style = [] ParentFont = False WordWrap = True end object Label28: TLabel Left = 184 Top = 123 Width = 201 Height = 17 AutoSize = False Caption = 'Registry files from the last WinRescue backup.' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Small Fonts' Font.Style = [] ParentFont = False end object Label27: TLabel Left = 160 Top = 146 Width = 225 Height = 33 AutoSize = False Caption = 'All files, folders, and MultiFile groups backed up on diskette. ' + ' See Backup Preferences - "Backup to:" to backup to diskette. M' + 'any diskettes may be used.' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Small Fonts' Font.Style = [] ParentFont = False WordWrap = True end object Label29: TLabel Left = 176 Top = 189 Width = 209 Height = 11 AutoSize = False Caption = 'Returns Windows back to it'#39's original settings.' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Small Fonts' Font.Style = [] ParentFont = False end object Label19: TLabel Left = 192 Top = 35 Width = 193 Height = 38 AutoSize = False Caption = 'Registry files copied when Win95 starts. This is probably the m' + 'ost recent backup, but it is often corupt. It is recommended to' + ' try this first.' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Small Fonts' Font.Style = [] ParentFont = False WordWrap = True end object Backup: TRadioButton Left = 24 Top = 72 Width = 185 Height = 15 Caption = 'Restore &WinRescue Backup' Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = PreferenceChange end object ComboBox4: TComboBox Left = 40 Top = 90 Width = 169 Height = 21 Style = csDropDownList Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'Restore Most Recent Backup') ParentFont = False TabOrder = 1 end object Spare: TRadioButton Left = 24 Top = 120 Width = 145 Height = 17 Caption = 'Restore Sp&are Registry' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = PreferenceChange end object Diskette: TRadioButton Left = 24 Top = 144 Width = 137 Height = 15 Caption = 'Restore from &Diskette' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = PreferenceChange end object Original: TRadioButton Left = 24 Top = 186 Width = 145 Height = 17 Caption = 'Restore &Original Registry' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = PreferenceChange end object Previous: TRadioButton Left = 24 Top = 32 Width = 169 Height = 17 Caption = 'Restore &Previous Registry' Checked = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 TabStop = True OnClick = PreferenceChange end end object TabSheet2: TTabSheet HelpContext = 46 Caption = 'Directories' object Button4: TTransparentButton Left = 25 Top = 20 Width = 62 Height = 28 Caption = '&Root' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnClick = DDirClick end object Button5: TTransparentButton Left = 25 Top = 58 Width = 62 Height = 28 Caption = '&Startup' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnClick = DDirClick end object Button8: TTransparentButton Left = 25 Top = 96 Width = 62 Height = 28 Caption = '&Windows' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnClick = DDirClick end object Button6: TTransparentButton Left = 25 Top = 134 Width = 62 Height = 28 Caption = 'S&ystem' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnClick = DDirClick end object Button7: TTransparentButton Left = 25 Top = 172 Width = 62 Height = 28 Caption = '&User' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnClick = DDirClick end object Label33: TLabel Left = 120 Top = 32 Width = 254 Height = 153 Alignment = taCenter AutoSize = False Caption = 'These Default Directories should be correct. They do not need t' + 'o be changed unless you have a special setup, like, multiple use' + 'rs or foreign version.' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end end object TabSheet3: TTabSheet HelpContext = 45 Caption = 'Backup Manager' object Label3: TLabel Left = 120 Top = 16 Width = 145 Height = 13 Alignment = taCenter AutoSize = False Caption = '&List of All Backup Sets' FocusControl = ListView1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object ListView1: TListView Left = 24 Top = 32 Width = 353 Height = 145 Columns = < item Caption = 'Backup Set' Width = 75 end item Caption = 'Full Path' Width = 300 end> OnChange = ListView1Change OnEdited = ListViewEdited OnMouseDown = ListView1MouseDown TabOrder = 0 ViewStyle = vsReport end object Button9: TButton Left = 200 Top = 175 Width = 177 Height = 18 Caption = '&Delete' TabOrder = 2 OnClick = Button9Click end object Button10: TButton Left = 24 Top = 175 Width = 176 Height = 18 Caption = 'Re&name' TabOrder = 1 OnClick = Button10Click end end object TabSheet4: TTabSheet Caption = 'Files' object Shape2: TShape Left = 8 Top = 32 Width = 113 Height = 153 Brush.Color = clGray end object Label7: TLabel Left = 8 Top = 8 Width = 385 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Files to Backup and Restore' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label14: TLabel Left = 32 Top = 88 Width = 54 Height = 13 Caption = 'Do Nothing' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label15: TLabel Left = 32 Top = 104 Width = 61 Height = 13 Caption = 'Backup Only' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label16: TLabel Left = 32 Top = 120 Width = 73 Height = 25 AutoSize = False Caption = 'Backup and Restore' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True WordWrap = True end object Image1: TImage Left = 16 Top = 120 Width = 17 Height = 17 Picture.Data = {} end object Image3: TImage Left = 16 Top = 104 Width = 17 Height = 17 Picture.Data = {} end object Image2: TImage Left = 16 Top = 88 Width = 17 Height = 17 Picture.Data = {} end object Label17: TLabel Left = 16 Top = 152 Width = 97 Height = 33 Alignment = taCenter AutoSize = False Caption = 'Click on Add to add a file to the List.' Transparent = True WordWrap = True end object Label13: TLabel Left = 16 Top = 40 Width = 97 Height = 41 Alignment = taCenter AutoSize = False Caption = 'To change a file'#39's status, click on it'#39's checkbox.' Transparent = True WordWrap = True end object FileList1: TCheckListBox Left = 128 Top = 24 Width = 265 Height = 161 AllowGrayed = True ItemHeight = 13 Items.Strings = ( 'Registry' 'Initiation Files' 'Start Menu' 'Desktop' 'Favorites' 'Recent') TabOrder = 0 OnClick = FileList1Click OnMouseDown = FileList1MouseDown end object Button16: TButton Left = 128 Top = 184 Width = 133 Height = 17 Caption = '&Add' TabOrder = 1 OnClick = Button16Click end object Button17: TButton Left = 261 Top = 184 Width = 132 Height = 17 Caption = '&Delete' Enabled = False TabOrder = 2 OnClick = Button17Click end end object TabSheet5: TTabSheet Caption = 'MultiFiles' object Label8: TLabel Left = 16 Top = 6 Width = 92 Height = 13 Caption = 'MultiFile Groups' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 112 Top = 6 Width = 269 Height = 13 Caption = '- for Backing up and Restoring Directories and File Types' end object Shape3: TShape Left = 8 Top = 32 Width = 113 Height = 153 Brush.Color = clGray end object Label22: TLabel Left = 16 Top = 40 Width = 97 Height = 41 Alignment = taCenter AutoSize = False Caption = 'To change a group'#39's status, click on it'#39's checkbox.' Transparent = True WordWrap = True end object Label23: TLabel Left = 32 Top = 88 Width = 54 Height = 13 Caption = 'Do Nothing' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label24: TLabel Left = 32 Top = 104 Width = 61 Height = 13 Caption = 'Backup Only' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label25: TLabel Left = 32 Top = 120 Width = 73 Height = 25 AutoSize = False Caption = 'Backup and Restore' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True WordWrap = True end object Label26: TLabel Left = 16 Top = 152 Width = 97 Height = 33 Alignment = taCenter AutoSize = False Caption = 'Click on Add to add a group to the List.' Transparent = True WordWrap = True end object Image7: TImage Left = 16 Top = 120 Width = 17 Height = 17 Picture.Data = {} end object Image8: TImage Left = 16 Top = 104 Width = 17 Height = 17 Picture.Data = {} end object Image9: TImage Left = 16 Top = 88 Width = 17 Height = 17 Picture.Data = {} end object MultiFilesList: TCheckListBox Left = 128 Top = 24 Width = 265 Height = 161 AllowGrayed = True ItemHeight = 13 TabOrder = 0 OnClick = MultiFilesListClick OnMouseDown = MultiFilesListMouseDown end object Button11: TButton Left = 128 Top = 184 Width = 88 Height = 17 Caption = '&Add' TabOrder = 1 OnClick = Button11Click end object Button12: TButton Left = 304 Top = 184 Width = 89 Height = 17 Caption = '&Delete' Enabled = False TabOrder = 2 OnClick = Button12Click end object Button15: TButton Left = 216 Top = 184 Width = 89 Height = 17 Caption = '&Edit' Enabled = False TabOrder = 3 OnClick = Button15Click end end object TabSheet8: TTabSheet Caption = 'Automation' object Label31: TLabel Left = 16 Top = 8 Width = 369 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Automatic Functions' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 32 Top = 42 Width = 161 Height = 13 AutoSize = False Caption = 'S&tart WinRescue 95 and Wait.' FocusControl = ComboBox1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label4: TLabel Left = 32 Top = 66 Width = 161 Height = 13 AutoSize = False Caption = 'Automatically perform B&ackup.' FocusControl = ComboBox2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label5: TLabel Left = 32 Top = 90 Width = 161 Height = 13 AutoSize = False Caption = 'Automatically perform Reg&Pack.' FocusControl = ComboBox3 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label32: TLabel Left = 24 Top = 120 Width = 337 Height = 41 Alignment = taCenter AutoSize = False Caption = 'Win98 Task Scheduler - runs WinRescue at specified time. Otherw' + 'ise Functions are run when Windows starts. To use the Task Sche' + 'duler one of the Automatic Functions must be set to Use Schedule' + 'r.' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object ComboBox1: TComboBox Left = 208 Top = 38 Width = 153 Height = 21 Style = csDropDownList Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'Daily' 'Weekly' 'Bi-Weekly' 'Monthly' 'Use Scheduler' 'Do Not Perform') ParentFont = False TabOrder = 0 OnChange = FreqClick end object ComboBox2: TComboBox Left = 208 Top = 62 Width = 153 Height = 21 Style = csDropDownList Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'Daily' 'Weekly' 'Bi-Weekly' 'Monthly' 'Use Scheduler' 'Do Not Perform') ParentFont = False TabOrder = 1 OnChange = FreqClick end object ComboBox3: TComboBox Left = 208 Top = 86 Width = 153 Height = 21 Style = csDropDownList Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'Daily' 'Weekly' 'Bi-Weekly' 'Monthly' 'Use Scheduler' 'Do Not Perform') ParentFont = False TabOrder = 2 OnChange = FreqClick end object Button13: TButton Left = 24 Top = 176 Width = 161 Height = 25 Caption = 'Setup the Task Scheduler' TabOrder = 3 OnClick = Button13Click end object Button21: TButton Left = 200 Top = 176 Width = 161 Height = 25 Caption = 'Remove WinRescue' TabOrder = 4 OnClick = Button21Click end end end object Button1: TButton Left = 184 Top = 280 Width = 73 Height = 20 Caption = 'O K' Default = True ModalResult = 1 TabOrder = 1 OnClick = Button1Click end object Button2: TButton Left = 264 Top = 280 Width = 73 Height = 20 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 2 OnClick = Button2Click end object Button3: TButton Left = 344 Top = 280 Width = 73 Height = 20 Caption = '&Apply' Enabled = False TabOrder = 3 OnClick = Button3Click end object PopupMenu1: TPopupMenu AutoPopup = False Left = 104 Top = 256 object Dir6: TMenuItem Caption = 'Dir' HelpContext = 810 Hint = 'The Current Root Directory' end object Browse6: TMenuItem Caption = '&Browse' HelpContext = 820 Hint = 'Click here to assign a different root directory' OnClick = BrowseClick end object N7: TMenuItem Caption = '-' HelpContext = 830 end object DefaultDirectory6: TMenuItem Caption = '&Default Directory' HelpContext = 840 Hint = 'Change back to the default root directory.' OnClick = DefaultDirectoryClick end end object DirectoryDialog1: TDirectoryDialog Left = 64 Top = 256 end end