object Form1: TForm1
  Left = 792
  Top = 671
  Width = 402
  Height = 300
  Caption = 'Field Info Test'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  Position = poScreenCenter
  OnActivate = FormActivate
  TextHeight = 16
  object DBGrid1: TDBGrid
    Left = 0
    Top = 41
    Width = 394
    Height = 232
    Align = alClient
    DataSource = DataSource1
    TabOrder = 0
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = 'System'
    TitleFont.Style = []
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 394
    Height = 41
    Align = alTop
    TabOrder = 1
    object SaveBtn: TButton
      Left = 10
      Top = 5
      Width = 89
      Height = 33
      Caption = '&Save Fields'
      TabOrder = 0
      OnClick = SaveBtnClick
    end
    object LoadBtn: TButton
      Left = 105
      Top = 5
      Width = 89
      Height = 33
      Caption = '&Load Fields'
      TabOrder = 1
      OnClick = LoadBtnClick
    end
    object OrigBtn: TButton
      Left = 200
      Top = 5
      Width = 89
      Height = 33
      Caption = '&Orig Fields'
      TabOrder = 2
      OnClick = OrigBtnClick
    end
    object QuitBtn: TButton
      Left = 295
      Top = 5
      Width = 89
      Height = 33
      Caption = '&Quit'
      TabOrder = 3
      OnClick = QuitBtnClick
    end
  end
  object TestTable: TTable
    Left = 340
    Top = 175
  end
  object DataSource1: TDataSource
    DataSet = TestTable
    Left = 300
    Top = 175
  end
end