PC World Komputer 1998 July & August/Pcwk78a98.iso/Registry/Mregchg/_SETUP.1/mregchg.exe/0/RCDATA/TFRMEXIST/TFRMEXIST.txt

Text File | 1998-04-08 | 4KB | 189 lines

object frmExist: TfrmExist
  Left = 732
  Top = 170
  HelpContext = 150
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Does this Key Exist?'
  ClientHeight = 324
  ClientWidth = 262
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  Position = poDefaultPosOnly
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 14
  object Label2: TLabel
    Left = 20
    Top = 8
    Width = 21
    Height = 14
    Caption = '&Hive'
    FocusControl = CBRootKey
  end
  object Label3: TLabel
    Left = 20
    Top = 48
    Width = 19
    Height = 14
    Caption = '&Key'
    FocusControl = edKeyPath
  end
  object Label4: TLabel
    Left = 20
    Top = 88
    Width = 58
    Height = 14
    Caption = 'Value &Name'
    FocusControl = edKeyName
  end
  object Label6: TLabel
    Left = 20
    Top = 168
    Width = 28
    Height = 14
    Caption = '&Value'
    FocusControl = edKeyValue
  end
  object Label5: TLabel
    Left = 20
    Top = 128
    Width = 58
    Height = 14
    Caption = 'Value  &Type'
    FocusControl = cbKeyType
  end
  object CBRootKey: TComboBox
    Left = 20
    Top = 24
    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 edKeyPath: TComboBox
    Left = 20
    Top = 64
    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 = 1
  end
  object edKeyName: TComboBox
    Left = 20
    Top = 104
    Width = 221
    Height = 22
    Hint = 'The Key Name to change'
    ItemHeight = 14
    TabOrder = 2
  end
  object cbKeyType: TComboBox
    Left = 20
    Top = 144
    Width = 221
    Height = 22
    Style = csDropDownList
    ItemHeight = 14
    Items.Strings = (
      'REG_SZ'
      'REG_DWORD'
      'REG_MULTI_SZ'
      'REG_EXPAND_SZ'
      'REG_NONE')
    TabOrder = 3
  end
  object edKeyValue: TComboBox
    Left = 20
    Top = 183
    Width = 221
    Height = 22
    Hint = 'Set the Key to this value'
    ItemHeight = 14
    TabOrder = 4
  end
  object chkIgnoreValue: TCheckBox
    Left = 20
    Top = 208
    Width = 217
    Height = 17
    Caption = 'Ignore Value (check key exists only)'
    TabOrder = 5
    OnClick = chkIgnoreValueClick
  end
  object btnRun: TButton
    Left = 166
    Top = 276
    Width = 75
    Height = 25
    Caption = '&Run'
    Default = True
    TabOrder = 8
    OnClick = btnRunClick
  end
  object btnStop: TButton
    Left = 20
    Top = 276
    Width = 75
    Height = 25
    Caption = '&Stop'
    Enabled = False
    TabOrder = 9
    OnClick = btnStopClick
  end
  object chkLogIfNotExist: TCheckBox
    Left = 20
    Top = 228
    Width = 241
    Height = 17
    Caption = 'Log if the Entry does NOT Exist (Failure Log)'
    TabOrder = 6
  end
  object chkLogIfExist: TCheckBox
    Left = 20
    Top = 248
    Width = 241
    Height = 17
    Caption = 'Log if the Entry DOES Exist (Success Log)'
    TabOrder = 7
  end
  object sbGroup: TStatusBar
    Left = 0
    Top = 305
    Width = 262
    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