object frmCopyTree: TfrmCopyTree Left = 258 Top = 236 Width = 567 Height = 347 HelpContext = 180 Caption = 'Advanced REG File Operations' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Menu = MainMenu1 Position = poDefaultPosOnly OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 14 object Panel2: TPanel Left = 237 Top = 0 Width = 322 Height = 301 Align = alClient Caption = 'Panel2' TabOrder = 0 object MFile: TMemo Left = 1 Top = 1 Width = 320 Height = 299 Align = alClient Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] Lines.Strings = ( '(Scroll down to view these instructions)' 'This form will allow you to:' '' '1. Create a REGEDIT4 formatted file from' 'the local computer or a remote computer.' 'The file will include all keys, subkeys' 'and values from the selected key of the' 'source computer.' '' ' Instructions: Type in the name of the' ' source computer in the '#39'Source Computer'#39 ' box. Select the Root Key. Enter the' ' Key Path to examine. For example' ' '#39'\Software\Microsoft\Windows'#39 ' Then select "Edit" - "Create From' ' Computer". (Depending on the size of' ' the key, your computer may appear to' ' freeze for several seconds.)' '' '2. Apply changes from any REGEDIT4' 'formatted file - including those created' 'with REGEDIT.EXE - to selected computers' 'on the network.' '' ' Instructions: Choose File - Load from' ' the menu. This will load the selected' ' file into this window. You may edit it' ' or make changes to the destination key' ' (see below) before applying it to the' ' selected computers.' '' '3. Make a change in destination root key' 'and/or key path. This will allow you to' '"copy" a key from one area of the registry' 'to another.' '' ' Instructions: To make the changes at' ' the time the file is created, simply' ' follow the instructions in step one, but' ' before selecting "Create From Computer"' ' check the "Change Destination" box and' ' enter the changes you would like made.' '' ' To change a file after it is loaded, in' ' the '#39'Source Computer'#39' area, select the' ' Root Key and Key Path as they are' ' currently displayed in the file. Check' ' the "Change Destination" box and enter' ' the changes.' '' ' For Example, you create an export file' ' with REGEDIT.EXE exporting the key:' '' ' [HKEY_USERS\.DEFAULT\Software\Eytcheson]' '' ' and want to place it on remote computers' ' as:' '' ' [HKEY_LOCAL_MACHINE\Software\SomethingElse]' '' ' You would select HKEY_USERS in the' ' Source Root Key box, and enter' ' \.DEFAULT\Software\Eytcheson in the' ' Source Root Path. Then, check the' ' "Change Destination" box, select' ' HKEY_LOCAL_MACHINE in the Destination' ' Root Key and enter \Software\SomethingElse' ' in the Destination Path.' '' ' After you have made your selections,' ' select Edit - Change Destination from' ' the menu.' '' '4. Apply the changes from the window' 'to all selected computers.' '' ' Instructions: When the text in the' ' right window is exactly what you want' ' to insert into the registry of the' ' remote computers, Select Apply -' ' Apply to Selected Computers.') ParentFont = False ScrollBars = ssBoth TabOrder = 0 WantTabs = True WordWrap = False OnChange = MFileChange end end object Panel3: TPanel Left = 0 Top = 0 Width = 237 Height = 301 Align = alLeft TabOrder = 1 object Label2: TLabel Left = 8 Top = 64 Width = 59 Height = 14 Caption = 'Source &Hive' FocusControl = CBRootKey end object Label3: TLabel Left = 8 Top = 104 Width = 57 Height = 14 Caption = '&Source Key' FocusControl = edKeyPath end object Label1: TLabel Left = 8 Top = 12 Width = 87 Height = 14 Caption = 'Source &Computer:' end object Label4: TLabel Left = 8 Top = 188 Width = 77 Height = 14 Caption = '&Destination Hive' Enabled = False FocusControl = cbDestRoot end object Label5: TLabel Left = 8 Top = 228 Width = 75 Height = 14 Caption = 'Destination &Key' Enabled = False FocusControl = edDestKeyPath end object CBRootKey: TComboBox Left = 8 Top = 80 Width = 221 Height = 22 Hint = 'Select the Root Key for the operation -- can only be HKEY_LOCAL_' + 'MACHINE or HKEY_USERS' Style = csDropDownList ItemHeight = 14 Items.Strings = ( 'HKEY_LOCAL_MACHINE' 'HKEY_USERS') TabOrder = 1 end object edKeyPath: TComboBox Left = 8 Top = 120 Width = 221 Height = 22 Hint = 'Enter the full path to the key. You may use the '#39'*'#39' in ONE plac' + 'e in the key to select all subkeys for that key. eg: SOFTWARE\IC' + 'C\USERS\*\ProgName will change the ProgName\Key = value for all ' + 'users under the SOFTWARE\ICC\USERS subkey' ItemHeight = 14 TabOrder = 2 end object cbComputerName: TComboBox Left = 8 Top = 32 Width = 221 Height = 22 ItemHeight = 14 TabOrder = 0 end object cbDestRoot: TComboBox Left = 8 Top = 204 Width = 221 Height = 22 Hint = 'Select the Root Key for the operation -- can only be HKEY_LOCAL_' + 'MACHINE or HKEY_USERS' Style = csDropDownList Enabled = False ItemHeight = 14 Items.Strings = ( 'HKEY_LOCAL_MACHINE' 'HKEY_USERS') TabOrder = 4 end object edDestKeyPath: TComboBox Left = 8 Top = 244 Width = 221 Height = 22 Hint = 'Enter the full path to the key. You may use the '#39'*'#39' in ONE plac' + 'e in the key to select all subkeys for that key. eg: SOFTWARE\IC' + 'C\USERS\*\ProgName will change the ProgName\Key = value for all ' + 'users under the SOFTWARE\ICC\USERS subkey' Enabled = False ItemHeight = 14 TabOrder = 5 end object chkChangeDest: TCheckBox Left = 8 Top = 168 Width = 197 Height = 17 Caption = 'C&hange Destination' TabOrder = 3 OnClick = chkChangeDestClick end object sbGroup: TStatusBar Left = 1 Top = 281 Width = 235 Height = 19 Enabled = False Panels = < item Text = 'Sel:' Width = 80 end item Text = 'Proc:' Width = 80 end item Text = 'Fail:' Width = 80 end> SimplePanel = False SizeGrip = False end end object MainMenu1: TMainMenu Left = 137 Top = 4 object File1: TMenuItem Caption = '&File' object SaveFile1: TMenuItem Caption = '&Save' OnClick = SaveFile1Click end object Load1: TMenuItem Caption = '&Load' OnClick = Load1Click end object N1: TMenuItem Caption = '-' end object Exit1: TMenuItem Caption = '&Exit' OnClick = Exit1Click end end object Edit1: TMenuItem Caption = '&Edit' object CreateREGEDITFile1: TMenuItem Caption = 'C&reate from Computer' OnClick = CreateREGEDITFile1Click end object ModifyFile1: TMenuItem Caption = 'Change &Destination' OnClick = ModifyFile1Click end object N2: TMenuItem Caption = '-' end object Clear1: TMenuItem Caption = '&Clear Results' OnClick = Clear1Click end end object Apply1: TMenuItem Caption = '&Apply' object ApplythistexttoSelectedComputers1: TMenuItem Caption = 'Apply to Selected &Computers' Enabled = False OnClick = ApplythistexttoSelectedComputers1Click end end end object OpenDialog1: TOpenDialog DefaultExt = 'REG' Filter = 'REGEDIT4 files|*.REG|Text Files|*.txt|All Files|*.*' Left = 168 Top = 4 end object SaveDialog1: TSaveDialog DefaultExt = 'REG' FileName = 'MREGCHG.REG' Filter = 'REGEDIT4 Files|*.REG|Text Files|*.txt|All Files|*.*' Left = 200 Top = 4 end end