object Form1: TForm1 Left = 377 Top = 233 Width = 397 Height = 546 Caption = 'Remote Registry Change' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Menu = MainMenu1 Position = poDefaultPosOnly OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 14 object Splitter1: TSplitter Left = 0 Top = 329 Width = 389 Height = 2 Cursor = crVSplit Align = alTop end object Panel1: TPanel Left = 0 Top = 0 Width = 389 Height = 329 Hint = 'Double click to Expand or Restore' HelpContext = 120 Align = alTop BevelOuter = bvNone TabOrder = 0 OnDblClick = Panel1DblClick OnResize = Panel1Resize object Label1: TLabel Left = 8 Top = 4 Width = 82 Height = 14 Caption = '&Computer Names' FocusControl = cklList end object cklList: TCheckListBox Left = 2 Top = 20 Width = 137 Height = 305 Hint = 'Right Click for Menu' HelpContext = 400 OnClickCheck = cklListClickCheck Ctl3D = True Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ItemHeight = 14 ParentCtl3D = False ParentFont = False PopupMenu = PopupMenu1 Sorted = True TabOrder = 0 TabWidth = 9 OnDblClick = ComputerList1Click end object PageControl1: TPageControl Left = 145 Top = 0 Width = 244 Height = 329 ActivePage = tsSingle Align = alRight MultiLine = True TabOrder = 1 object tsSingle: TTabSheet Hint = 'Add, Change or Delete Keys or Values.' HelpContext = 130 Caption = 'Single Key' object Label2: TLabel Left = 8 Top = 4 Width = 21 Height = 14 Caption = '&Hive' FocusControl = CBRootKey end object Label3: TLabel Left = 8 Top = 44 Width = 43 Height = 14 Caption = 'Key &Path' FocusControl = edKeyPath end object Label4: TLabel Left = 8 Top = 84 Width = 58 Height = 14 Caption = 'Value &Name' FocusControl = edKeyName end object Label5: TLabel Left = 8 Top = 124 Width = 55 Height = 14 Caption = 'Value &Type' FocusControl = cbKeyType end object Label6: TLabel Left = 8 Top = 164 Width = 28 Height = 14 Caption = '&Value' FocusControl = edKeyValue end object btnRun: TButton Left = 154 Top = 251 Width = 75 Height = 25 Caption = '&Run' Default = True TabOrder = 5 OnClick = btnRunClick end object CBRootKey: TComboBox Left = 8 Top = 20 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 = 0 end object cbKeyType: TComboBox Left = 8 Top = 140 Width = 221 Height = 22 Hint = 'Select the type of value to add or change' Style = csDropDownList ItemHeight = 14 Items.Strings = ( 'REG_SZ' 'REG_DWORD' 'REG_MULTI_SZ' 'REG_EXPAND_SZ' 'REG_NONE' '*DELETE KEY*' '*DELETE VALUE*') TabOrder = 3 end object edKeyPath: TComboBox Left = 8 Top = 60 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.' ItemHeight = 14 TabOrder = 1 end object edKeyName: TComboBox Left = 8 Top = 100 Width = 221 Height = 22 Hint = 'The Name of the Value to Change or blank for none.' ItemHeight = 14 TabOrder = 2 end object edKeyValue: TComboBox Left = 8 Top = 179 Width = 221 Height = 22 Hint = 'Set the Value Name to This Value' ItemHeight = 14 TabOrder = 4 end object btnStop: TButton Left = 8 Top = 251 Width = 75 Height = 25 Caption = '&Stop' Enabled = False TabOrder = 6 OnClick = btnStopClick end object GroupBox1: TGroupBox Left = 8 Top = 204 Width = 221 Height = 41 Caption = 'Action if Key Not Found' TabOrder = 7 object rbCreatekey: TRadioButton Left = 8 Top = 16 Width = 109 Height = 17 Hint = 'Create or Change the Key' Caption = 'Create Ke&y' Checked = True TabOrder = 0 TabStop = True end object rbIgnorekey: TRadioButton Left = 124 Top = 16 Width = 89 Height = 17 Hint = 'If the Key doesn'#39't exist, don'#39't create it.' Caption = '&Ignore entry' TabOrder = 1 end end object sbSingle: TStatusBar Left = 0 Top = 281 Width = 236 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 tsGroup: TTabSheet HelpContext = 140 Caption = 'Key Group' object Label7: TLabel Left = 8 Top = 4 Width = 84 Height = 14 Caption = 'Source Co&mputer' end object Label8: TLabel Left = 8 Top = 84 Width = 57 Height = 14 Caption = 'Source &Key' end object Label9: TLabel Left = 8 Top = 164 Width = 75 Height = 14 Caption = 'De&stination Key' end object Label10: TLabel Left = 8 Top = 44 Width = 59 Height = 14 Caption = 'Source &Hive' end object Label11: TLabel Left = 8 Top = 124 Width = 200 Height = 14 Caption = '&Destination Hive (for selected computers)' end object cbgrpSrcComp: TComboBox Left = 8 Top = 20 Width = 221 Height = 22 ItemHeight = 14 TabOrder = 0 end object cbGrpSrcKey: TComboBox Left = 8 Top = 100 Width = 221 Height = 22 ItemHeight = 14 TabOrder = 2 end object cbgrpDestKey: TComboBox Left = 8 Top = 179 Width = 221 Height = 22 ItemHeight = 14 Items.Strings = ( '*SAME AS SOURCE*') TabOrder = 4 end object btnStopHive: TButton Left = 8 Top = 251 Width = 75 Height = 25 Caption = '&Stop' TabOrder = 6 OnClick = btnStopHiveClick end object btnRunHive: TButton Left = 154 Top = 251 Width = 75 Height = 25 Caption = '&Run' Default = True TabOrder = 5 OnClick = btnCreateREGClick end object cbGrpSrcRootKey: TComboBox Left = 8 Top = 60 Width = 221 Height = 22 Style = csDropDownList ItemHeight = 14 Items.Strings = ( 'HKEY_LOCAL_MACHINE' 'HKEY_USERS') TabOrder = 1 end object cbGrpDestRootKey: TComboBox Left = 8 Top = 140 Width = 221 Height = 22 Style = csDropDownList ItemHeight = 14 Items.Strings = ( '*SAME AS SOURCE*' 'HKEY_LOCAL_MACHINE' 'HKEY_USERS') TabOrder = 3 end object chkDeleteBeforeCopy: TCheckBox Left = 12 Top = 220 Width = 221 Height = 17 Caption = 'Delete Destination Key &Before Copying' TabOrder = 7 end object sbGroup: TStatusBar Left = 0 Top = -19 Width = 0 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 TabSheet1: TTabSheet Caption = 'Additional' TabVisible = False object grpIP: TGroupBox Left = 20 Top = 104 Width = 193 Height = 73 Caption = 'IP Address Lookup' TabOrder = 0 object btnIPLookup: TButton Left = 12 Top = 16 Width = 169 Height = 25 Caption = 'Lookup IP Addresses' TabOrder = 0 OnClick = btnIPLookupClick end object btnIPStopLookup: TButton Left = 12 Top = 41 Width = 169 Height = 25 Caption = 'Stop Lookup' Enabled = False TabOrder = 1 OnClick = btnIPStopLookupClick end end object grpChangeUserRights: TGroupBox Left = 20 Top = 12 Width = 193 Height = 73 Caption = 'Change User Rights' TabOrder = 1 object btnChgUserRights: TButton Left = 12 Top = 28 Width = 169 Height = 25 Caption = 'Change User Rights' TabOrder = 0 OnClick = btnChgUserRightsClick end end end object TabSheet2: TTabSheet HelpContext = 160 Caption = 'Logging' object GroupBox2: TGroupBox Left = 6 Top = 4 Width = 225 Height = 97 Caption = 'On Failure to Connect' TabOrder = 0 object edConnectFailure: TEdit Left = 12 Top = 44 Width = 181 Height = 22 TabOrder = 0 Text = 'ConnectFail.log' end object chkFailToConnect: TCheckBox Left = 12 Top = 24 Width = 169 Height = 17 Caption = 'Log Failure to Connect to File:' State = cbChecked TabOrder = 1 end object btnConnectFailure: TButton Left = 196 Top = 44 Width = 23 Height = 22 Caption = '...' Default = True TabOrder = 2 OnClick = btnConnectFailureClick end object btnClearConnectFail: TButton Left = 124 Top = 72 Width = 75 Height = 17 Caption = 'Clear Now' TabOrder = 3 OnClick = btnClearConnectFailClick end object btnViewConnectFailure: TButton Left = 28 Top = 72 Width = 75 Height = 17 Caption = 'View Log' TabOrder = 4 OnClick = btnViewConnectFailureClick end end object GroupBox3: TGroupBox Left = 6 Top = 104 Width = 225 Height = 97 Caption = 'On Operation Failure' TabOrder = 1 object edGeneralFailure: TEdit Left = 12 Top = 44 Width = 181 Height = 22 TabOrder = 0 Text = 'GeneralFail.log' end object chkGeneralFailure: TCheckBox Left = 12 Top = 24 Width = 193 Height = 17 Caption = 'Log Operation Failures to File:' State = cbChecked TabOrder = 1 end object btnGeneralFailure: TButton Left = 196 Top = 44 Width = 23 Height = 22 Caption = '...' TabOrder = 2 OnClick = btnGeneralFailureClick end object btnClearGeneralFail: TButton Left = 124 Top = 72 Width = 75 Height = 17 Caption = 'Clear Now' TabOrder = 3 OnClick = btnClearGeneralFailClick end object btnViewGeneralFailure: TButton Left = 28 Top = 72 Width = 75 Height = 17 Caption = 'View Log' TabOrder = 4 OnClick = btnViewGeneralFailureClick end end object GroupBox4: TGroupBox Left = 6 Top = 200 Width = 225 Height = 97 Caption = 'On Operation Success' TabOrder = 2 object edGeneralSuccess: TEdit Left = 12 Top = 44 Width = 181 Height = 22 TabOrder = 0 Text = 'GeneralSuccess.log' end object chkGeneralSuccess: TCheckBox Left = 12 Top = 24 Width = 177 Height = 17 Caption = 'Log Operation Success to File:' State = cbChecked TabOrder = 1 end object btnGeneralSuccess: TButton Left = 196 Top = 44 Width = 23 Height = 22 Caption = '...' TabOrder = 2 OnClick = btnGeneralSuccessClick end object btnClearGeneralSuccess: TButton Left = 124 Top = 72 Width = 75 Height = 17 Caption = 'Clear Now' TabOrder = 3 OnClick = btnClearGeneralSuccessClick end object btnViewGeneralSuccess: TButton Left = 28 Top = 72 Width = 75 Height = 17 Caption = 'View Log' TabOrder = 4 OnClick = btnViewGeneralSuccessClick end end end end end object Panel2: TPanel Left = 0 Top = 331 Width = 389 Height = 150 Align = alClient BevelOuter = bvNone Caption = 'Panel2' TabOrder = 1 OnResize = Panel2Resize object mStat: TMemo Left = 2 Top = 3 Width = 384 Height = 144 HelpContext = 120 TabStop = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False ReadOnly = True ScrollBars = ssBoth TabOrder = 0 end end object SB1: TStatusBar Left = 0 Top = 481 Width = 389 Height = 19 Panels = < item Width = 100 end item Width = 100 end> SimplePanel = False end object MainMenu1: TMainMenu Left = 92 Top = 336 object File1: TMenuItem Caption = '&File' object SaveComputerNames1: TMenuItem Caption = '&Save Computer Names' OnClick = SaveComputerNames1Click end object LoadComputerNames1: TMenuItem Caption = '&Load Computer Names' OnClick = LoadComputerNames1Click end object N2: TMenuItem Caption = '-' end object ClearLog1: TMenuItem Caption = '&Clear Log' OnClick = ClearLog1Click end object SaveLogtoFile1: TMenuItem Caption = 'Save Log to &File' OnClick = SaveLogtoFile1Click end object N1: TMenuItem Caption = '-' end object Exit1: TMenuItem Caption = 'E&xit' OnClick = Exit1Click end end object Edit1: TMenuItem Caption = '&Edit' object ComputerList1: TMenuItem Caption = 'Edit &Computer List ...' HelpContext = 240 OnClick = ComputerList1Click end object SearchNetwork2: TMenuItem Caption = 'Searc&h Network ...' HelpContext = 230 OnClick = SearchNetwork1Click end object N3: TMenuItem Caption = '-' end object SelectAll1: TMenuItem Caption = '&Select All' HelpContext = 500 OnClick = SelectAll1Click end object SelectNone1: TMenuItem Caption = 'Select &None' HelpContext = 500 OnClick = SelectNone1Click end object N13: TMenuItem Caption = '-' end object GroupSelect1: TMenuItem Caption = '&Group Select ...' HelpContext = 510 OnClick = SelectGroup1Click end object GroupDeselect1: TMenuItem Caption = 'Group &Deselect ...' HelpContext = 510 OnClick = UnSelectGroup1Click end object N14: TMenuItem Caption = '-' end object InvertSelection2: TMenuItem Caption = '&Invert Selections' HelpContext = 520 OnClick = InvertSelection1Click end object N10: TMenuItem Caption = '-' end object RememberSelections2: TMenuItem Caption = '&Remember Selections' HelpContext = 515 OnClick = RememberSelections1Click end object RestoreSelections2: TMenuItem Caption = 'Res&tore Selections' HelpContext = 515 OnClick = RestoreSelections1Click end object N16: TMenuItem Caption = '-' end object SelectfromLogFile1: TMenuItem Caption = 'Select from &Log File ...' HelpContext = 525 OnClick = SelectfromLogFile1Click end object N17: TMenuItem Caption = '-' end object CreateGroup1: TMenuItem Caption = 'Sa&ve Group' HelpContext = 530 OnClick = CreateGroup1Click end object SelectfromGroupFile1: TMenuItem Caption = 'Select &from Saved Group' HelpContext = 530 OnClick = SelectfromGroupFile1Click end object N7: TMenuItem Caption = '-' end object ExpandWindow2: TMenuItem Caption = '&Expand Window' HelpContext = 535 OnClick = Panel1DblClick end end object Advanced1: TMenuItem Caption = '&Advanced' object CheckforKeyorValue1: TMenuItem Caption = '&Check for Key or Value ...' HelpContext = 150 OnClick = btnCheckKeyorValueClick end object ShutDownComputers1: TMenuItem Caption = '&Shutdown Systems ...' HelpContext = 170 OnClick = btnRestartSystemsClick end object N8: TMenuItem Caption = '-' end object ApplyFromFile1: TMenuItem Caption = 'Apply &from File ...' HelpContext = 210 OnClick = ApplyFromFile1Click end object CreateImportFile1: TMenuItem Caption = 'Create '#39'&Apply From'#39' File ...' HelpContext = 210 OnClick = CreateImportFile1Click end object N9: TMenuItem Caption = '-' end object ApplyfromREGfile1: TMenuItem Caption = '&Import from REG File ...' HelpContext = 180 OnClick = ApplyfromREGfile1Click end object CreateREGfilefromKey1: TMenuItem Caption = 'Advanced ® File Operations ...' HelpContext = 180 OnClick = CreateREGfilefromKey1Click end object N20: TMenuItem Caption = '-' end object ChangeUserRights1: TMenuItem Caption = 'Change &User Rights' HelpContext = 200 OnClick = btnChgUserRightsClick end object N21: TMenuItem Caption = '-' end object LookupIPAddress: TMenuItem Caption = '&Lookup IP Addresses' HelpContext = 190 OnClick = btnIPLookupClick end object N22: TMenuItem Caption = '-' end object CreateCallBatchFile1: TMenuItem Caption = 'Create '#39'Call'#39' Batch File' HelpContext = 220 OnClick = CreateCallBatchFile1Click end end object Options1: TMenuItem Caption = 'Options' object AllowConnectRetries1: TMenuItem Caption = 'Allow Connect Retries' Hint = 'When checked, retries connection to remote machines' OnClick = AllowConnectRetries1Click end end object Help1: TMenuItem Caption = '&Help' object Contents1: TMenuItem Caption = '&Contents' HelpContext = 1 OnClick = Contents1Click end object Support1: TMenuItem Caption = 'Eytcheson &Software Home Page' OnClick = Support1Click end object N5: TMenuItem Caption = '-' end object Register1: TMenuItem Caption = '&Registration Form' OnClick = Register1Click end object CCreg1: TMenuItem Caption = '&Secure Credit Card Registration' OnClick = CCreg1Click end object EnterRegistrationKey1: TMenuItem Caption = '&Enter Registration Key' OnClick = EnterRegistrationKey1Click end object ReRegisterAddComputers1: TMenuItem Caption = '&Re-Register (Add Computers)' Visible = False OnClick = ReRegisterAddComputers1Click end object N23: TMenuItem Caption = '-' end object Abo1: TMenuItem Caption = '&About' OnClick = Abo1Click end end end object SD1: TSaveDialog DefaultExt = '*.log' FileName = 'Registry Update.Log' Filter = 'Log Files|*.log|Text Files|*.txt' Options = [ofOverwritePrompt, ofHideReadOnly] Title = 'Save Change Log' Left = 64 Top = 336 end object PopupMenu1: TPopupMenu Left = 36 Top = 336 object SelectAll2: TMenuItem Caption = 'Select All' HelpContext = 500 OnClick = SelectAll1Click end object SelectNone2: TMenuItem Caption = 'Select None' HelpContext = 500 OnClick = SelectNone1Click end object N11: TMenuItem Caption = '-' end object SelectGroup1: TMenuItem Caption = 'Group Select ...' HelpContext = 510 OnClick = SelectGroup1Click end object UnSelectGroup1: TMenuItem Caption = 'Group Deselect ...' HelpContext = 510 OnClick = UnSelectGroup1Click end object N15: TMenuItem Caption = '-' end object RememberSelections1: TMenuItem Caption = 'Remember Selections' HelpContext = 515 OnClick = RememberSelections1Click end object RestoreSelections1: TMenuItem Caption = 'Restore Selections' Enabled = False HelpContext = 515 OnClick = RestoreSelections1Click end object N18: TMenuItem Caption = '-' end object InvertSelection1: TMenuItem Caption = 'Invert Selection' HelpContext = 520 OnClick = InvertSelection1Click end object N12: TMenuItem Caption = '-' end object SelectfromLogFile2: TMenuItem Caption = 'Select from Log File' HelpContext = 525 OnClick = SelectfromLogFile1Click end object N19: TMenuItem Caption = '-' end object SaveGroup1: TMenuItem Caption = 'Save Group' HelpContext = 530 OnClick = CreateGroup1Click end object RestorefromSavedGroup1: TMenuItem Caption = 'Restore from Saved Group' HelpContext = 530 OnClick = SelectfromGroupFile1Click end object N4: TMenuItem Caption = '-' end object AddEntry1: TMenuItem Caption = 'Add Single Entry' HelpContext = 505 OnClick = AddEntry1Click end object N6: TMenuItem Caption = '-' end object ExpandWindow1: TMenuItem Caption = 'Expand Window' HelpContext = 535 OnClick = Panel1DblClick end end object OpenDialog1: TOpenDialog DefaultExt = '*.dat' FileName = 'computers.dat' Filter = 'Multi-Remote Registry Change Datafile|*.dat' Left = 8 Top = 336 end object SaveDialog1: TSaveDialog DefaultExt = 'dat' FileName = 'Computers.dat' Filter = 'Multi-Remote Registry Change Data Files|*.dat' Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofNoReadOnlyReturn] Left = 120 Top = 336 end end