home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Runimage / Delphi50 / Help / Examples / Regini / REGINID.DFM / REGINID.txt
Encoding:
Text File  |  1999-08-11  |  2.7 KB  |  146 lines
  1. object RegIniForm: TRegIniForm
  2.   Left = 200
  3.   Top = 108
  4.   Width = 476
  5.   Height = 264
  6.   Caption = 'RegIniForm'
  7.   Color = clBtnFace
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   OldCreateOrder = True
  14.   OnCreate = FormCreate
  15.   OnDestroy = FormDestroy
  16.   PixelsPerInch = 96
  17.   TextHeight = 13
  18.   object GroupBox1: TGroupBox
  19.     Left = 8
  20.     Top = 16
  21.     Width = 145
  22.     Height = 169
  23.     Caption = 'Write to Registry'
  24.     TabOrder = 0
  25.     object Label1: TLabel
  26.       Left = 16
  27.       Top = 120
  28.       Width = 51
  29.       Height = 13
  30.       Caption = 'String Test'
  31.     end
  32.     object CheckBox_Write: TCheckBox
  33.       Left = 16
  34.       Top = 24
  35.       Width = 97
  36.       Height = 17
  37.       Caption = 'Boolean Test'
  38.       TabOrder = 0
  39.     end
  40.     object RadioGroup_Write: TRadioGroup
  41.       Left = 16
  42.       Top = 48
  43.       Width = 105
  44.       Height = 65
  45.       Caption = 'Integer Test'
  46.       Columns = 3
  47.       ItemIndex = 0
  48.       Items.Strings = (
  49.         '0'
  50.         '1'
  51.         '2'
  52.         '3'
  53.         '4'
  54.         '5')
  55.       TabOrder = 1
  56.     end
  57.     object Edit_Write: TEdit
  58.       Left = 16
  59.       Top = 136
  60.       Width = 105
  61.       Height = 21
  62.       TabOrder = 2
  63.       Text = 'Edit_Write'
  64.     end
  65.   end
  66.   object GroupBox2: TGroupBox
  67.     Left = 160
  68.     Top = 16
  69.     Width = 289
  70.     Height = 169
  71.     Caption = 'Read from Registry'
  72.     TabOrder = 1
  73.     object Label3: TLabel
  74.       Left = 16
  75.       Top = 120
  76.       Width = 51
  77.       Height = 13
  78.       Caption = 'String Test'
  79.     end
  80.     object CheckBox_Read: TCheckBox
  81.       Left = 16
  82.       Top = 24
  83.       Width = 97
  84.       Height = 17
  85.       Caption = 'Boolean Test'
  86.       TabOrder = 0
  87.       OnClick = CheckBox_ReadClick
  88.     end
  89.     object RadioGroup_Read: TRadioGroup
  90.       Left = 16
  91.       Top = 48
  92.       Width = 105
  93.       Height = 65
  94.       Caption = 'Integer Test'
  95.       Columns = 3
  96.       ItemIndex = 0
  97.       Items.Strings = (
  98.         '0'
  99.         '1'
  100.         '2'
  101.         '3'
  102.         '4'
  103.         '5')
  104.       TabOrder = 1
  105.       OnClick = RadioGroup_ReadClick
  106.     end
  107.     object Edit_Read: TEdit
  108.       Left = 16
  109.       Top = 136
  110.       Width = 105
  111.       Height = 21
  112.       ReadOnly = True
  113.       TabOrder = 2
  114.       Text = 'Edit_Read'
  115.     end
  116.     object Memo_Read: TMemo
  117.       Left = 144
  118.       Top = 24
  119.       Width = 129
  120.       Height = 137
  121.       Lines.Strings = (
  122.         '')
  123.       ReadOnly = True
  124.       TabOrder = 3
  125.     end
  126.   end
  127.   object Button_Write: TButton
  128.     Left = 24
  129.     Top = 200
  130.     Width = 105
  131.     Height = 25
  132.     Caption = 'Write to Registry'
  133.     TabOrder = 2
  134.     OnClick = Button_WriteClick
  135.   end
  136.   object Button_Read: TButton
  137.     Left = 176
  138.     Top = 200
  139.     Width = 105
  140.     Height = 25
  141.     Caption = 'Read from Registry'
  142.     TabOrder = 3
  143.     OnClick = Button_ReadClick
  144.   end
  145. end
  146.