object Form1: TForm1
  Left = 221
  Top = 110
  Width = 268
  Height = 130
  ActiveControl = BGetHeight
  Caption = 'Property Form'
  Color = clNavy
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000000020000000000000000000000000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    00000000000000000000000000000ECECC0FFFFFFFFF770000CCCC0C0FF00EEC
    CCC07FFFF00000CCCCCCCC0C07700CCCCCC00FFF00CEECEECCCCC00C0F700CEC
    ECCC077FF00CCECECCCCC0000F700EECCC000F7FF7000EECCCCCC0C077700CC0
    00CE0F7FFFF00CCECCCCC0C0FFF00C0EEC00077FFFF700EECECC0000F77000CE
    000FFFFFFFF7F0CCECCC0C0777F00E000FFFF7777FF7FF0CCECC000FFFF0000F
    FF7777FF7FF777700CEC007FF770077FFF7FFFFF7FFFFFFF00C0007777F00000
    0F7FF7777FFFF77770000FFFFFF00440000777FFFFFFF7FFFF000FFF77700C5C
    0000FFF7777FF7FF77FFFFFF7FF00CC5C5500777FF7FF7777FFFFFFF7FF00CCC
    5C450FFFFF7FFFFFFF7777FF77700CCCC5C440F7777FFFF7777FF7FFFFF00CCC
    CCCC5077FFFFFFF7FFFFF7FFFFF00CCCCCC5C0FFF7777FF7FF00000FF8800CCC
    CCCC407777FF7FF7704C445088800CECCCCCC07FFFFF7FFF0CC5C5C409500ECE
    CCCC0F7FF7777FFF0CCCCC5405900EECECCC0F7777FFFFF70CCCCCC505500EEE
    CCC0FFFFFFFFFFF80CECCCCC05500CCCC007FFFFFFFFF8850CCEECCC05500000
    0777FFFFF888895950CECEC055500FFFFFFFFF88889595959500000595500FFF
    F888889999599955595555555550088885959595959555559595959555500999
    9999595559595555555555555550000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000}
  PixelsPerInch = 96
  Scaled = False
  OnCreate = FormCreate
  TextHeight = 16
  object BGetHeight: TButton
    Left = 8
    Top = 64
    Width = 113
    Height = 30
    Caption = 'Get Height'
    TabOrder = 0
    OnClick = BGetHeightClick
  end
  object BSetHeight: TButton
    Left = 128
    Top = 64
    Width = 122
    Height = 30
    Caption = 'Set Height'
    TabOrder = 1
    OnClick = BSetHeightClick
  end
  object Edit1: TEdit
    Left = 16
    Top = 8
    Width = 233
    Height = 27
    Color = clBlue
    Font.Color = clYellow
    Font.Height = -16
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    Text = 'Edit1'
  end
end