object RegIniForm: TRegIniForm
  Left = 200
  Top = 108
  Width = 476
  Height = 264
  Caption = 'RegIniForm'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 16
    Width = 145
    Height = 169
    Caption = 'Write to Registry'
    TabOrder = 0
    object Label1: TLabel
      Left = 16
      Top = 120
      Width = 51
      Height = 13
      Caption = 'String Test'
    end
    object CheckBox_Write: TCheckBox
      Left = 16
      Top = 24
      Width = 97
      Height = 17
      Caption = 'Boolean Test'
      TabOrder = 0
    end
    object RadioGroup_Write: TRadioGroup
      Left = 16
      Top = 48
      Width = 105
      Height = 65
      Caption = 'Interger Test'
      Columns = 3
      ItemIndex = 0
      Items.Strings = (
        '0'
        '1'
        '2'
        '3'
        '4'
        '5')
      TabOrder = 1
    end
    object Edit_Write: TEdit
      Left = 16
      Top = 136
      Width = 105
      Height = 21
      TabOrder = 2
      Text = 'Edit_Write'
    end
  end
  object GroupBox2: TGroupBox
    Left = 160
    Top = 16
    Width = 289
    Height = 169
    Caption = 'Read from Registry'
    TabOrder = 1
    object Label3: TLabel
      Left = 16
      Top = 120
      Width = 51
      Height = 13
      Caption = 'String Test'
    end
    object CheckBox_Read: TCheckBox
      Left = 16
      Top = 24
      Width = 97
      Height = 17
      Caption = 'Boolean Test'
      TabOrder = 0
      OnClick = CheckBox_ReadClick
    end
    object RadioGroup_Read: TRadioGroup
      Left = 16
      Top = 48
      Width = 105
      Height = 65
      Caption = 'Interger Test'
      Columns = 3
      ItemIndex = 0
      Items.Strings = (
        '0'
        '1'
        '2'
        '3'
        '4'
        '5')
      TabOrder = 1
      OnClick = RadioGroup_ReadClick
    end
    object Edit_Read: TEdit
      Left = 16
      Top = 136
      Width = 105
      Height = 21
      ReadOnly = True
      TabOrder = 2
      Text = 'Edit_Read'
    end
    object Memo_Read: TMemo
      Left = 144
      Top = 24
      Width = 129
      Height = 137
      Lines.Strings = (
        '')
      ReadOnly = True
      TabOrder = 3
    end
  end
  object Button_Write: TButton
    Left = 24
    Top = 200
    Width = 105
    Height = 25
    Caption = 'Write to Registry'
    TabOrder = 2
    OnClick = Button_WriteClick
  end
  object Button_Read: TButton
    Left = 176
    Top = 200
    Width = 105
    Height = 25
    Caption = 'Read from Registry'
    TabOrder = 3
    OnClick = Button_ReadClick
  end
end