object Form1: TForm1
  Left = 146
  Top = 113
  Width = 696
  Height = 480
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter: TSplitter
    Left = 0
    Top = 315
    Width = 688
    Height = 3
    Cursor = crVSplit
    Align = alBottom
  end
  object ToolBar: TToolBar
    Left = 0
    Top = 0
    Width = 688
    Height = 26
    TabOrder = 0
    object btOpen: TButton
      Left = 0
      Top = 2
      Width = 75
      Height = 22
      Caption = 'Open'
      TabOrder = 0
      OnClick = btOpenClick
    end
    object btClose: TButton
      Left = 75
      Top = 2
      Width = 75
      Height = 22
      Caption = 'Close'
      TabOrder = 2
      OnClick = btCloseClick
    end
    object btAutoFill: TButton
      Left = 150
      Top = 2
      Width = 75
      Height = 22
      Caption = 'Append 100'
      TabOrder = 3
      OnClick = btAutoFillClick
    end
    object btAddField: TButton
      Left = 225
      Top = 2
      Width = 75
      Height = 22
      Caption = 'Add field'
      TabOrder = 4
      OnClick = btAddFieldClick
    end
    object btDelField: TButton
      Left = 300
      Top = 2
      Width = 75
      Height = 22
      Caption = 'Del field'
      TabOrder = 5
      OnClick = btDelFieldClick
    end
    object DBNavigator: TDBNavigator
      Left = 375
      Top = 2
      Width = 240
      Height = 22
      TabOrder = 1
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 26
    Width = 688
    Height = 87
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 33
      Width = 22
      Height = 13
      Caption = 'Field'
    end
    object Label2: TLabel
      Left = 184
      Top = 32
      Width = 27
      Height = 13
      Caption = 'Value'
    end
    object Label5: TLabel
      Left = 7
      Top = 62
      Width = 22
      Height = 13
      Caption = 'Filter'
    end
    object edField: TEdit
      Left = 40
      Top = 29
      Width = 121
      Height = 21
      TabOrder = 0
    end
    object edValue: TEdit
      Left = 222
      Top = 29
      Width = 121
      Height = 21
      TabOrder = 1
    end
    object btLocate: TButton
      Left = 357
      Top = 27
      Width = 75
      Height = 25
      Caption = 'Locate'
      TabOrder = 2
      OnClick = btLocateClick
    end
    object edFilter: TEdit
      Left = 40
      Top = 58
      Width = 303
      Height = 21
      TabOrder = 3
    end
    object cbFiltered: TCheckBox
      Left = 360
      Top = 62
      Width = 73
      Height = 17
      Caption = 'Filtered'
      TabOrder = 4
      OnClick = cbFilteredClick
    end
    object btLoad: TButton
      Left = 0
      Top = 1
      Width = 75
      Height = 22
      Caption = 'Load...'
      TabOrder = 5
      OnClick = btLoadClick
    end
    object btSave: TButton
      Left = 75
      Top = 1
      Width = 75
      Height = 22
      Caption = 'Save...'
      TabOrder = 6
      OnClick = btSaveClick
    end
    object btClear: TButton
      Left = 150
      Top = 0
      Width = 70
      Height = 23
      Caption = 'Clear'
      TabOrder = 7
      OnClick = btClearClick
    end
  end
  object DBGrid: TDBGrid
    Left = 0
    Top = 113
    Width = 688
    Height = 202
    Align = alClient
    DataSource = DataSource
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object DBMemo: TDBMemo
    Left = 0
    Top = 318
    Width = 688
    Height = 116
    Align = alBottom
    DataField = 'MEMO'
    DataSource = DataSource
    TabOrder = 3
  end
  object StatusBar: TStatusBar
    Left = 0
    Top = 434
    Width = 688
    Height = 19
    Panels = <
      item
        Width = 120
      end
      item
        Width = 120
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object VirtualTable: TVirtualTable
    Active = True
    FieldDefs = <
      item
        Name = 'NUMBER'
        DataType = ftFloat
      end
      item
        Name = 'STRING'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'DATE'
        DataType = ftDateTime
      end
      item
        Name = 'MEMO'
        DataType = ftMemo
      end>
    Left = 488
    Top = 42
    Data = {
[encoded data, 18673 characters]
      13B5CC4210004D656D6F2076616C7565202831303029}
  end
  object DataSource: TDataSource
    DataSet = VirtualTable
    Left = 520
    Top = 42
  end
  object SaveDialog: TSaveDialog
    DefaultExt = 'vtd'
    FileName = 'Data1.vtd'
    Filter = 'Virtual Table Data (*.vtd)|*.vtd|Any File (*.*)|*.*'
    Left = 520
    Top = 74
  end
  object OpenDialog: TOpenDialog
    DefaultExt = 'vtd'
    FileName = 'Data1.vtd'
    Filter = 'Virtual Table Data (*.vtd)|*.vtd|Any File (*.*)|*.*'
    Left = 488
    Top = 74
  end
end
