vtable.lfm

Oracle Data Access Components Source Code ODAC v.6.70.0.45

inherited VirtualTableFrame: TVirtualTableFrame
  Width = 443
  Height = 267
  Align = alClient
  object Splitter: TSplitter
    Left = 0
    Top = 148
    Width = 443
    Height = 3
    Cursor = crVSplit
    Align = alBottom
  end
  object DBGrid: TDBGrid
    Left = 0
    Top = 117
    Width = 443
    Height = 31
    Align = alClient
    DataSource = DataSource
    FixedColor = clBtnFace
    FixedHotColor = cl3DLight
    Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColumnMove, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    OptionsExtra = [dgeAutoColumns, dgeCheckboxColumn]
    ParentColor = False
    TabOrder = 0
  end
  object DBMemo: TDBMemo
    Left = 0
    Top = 151
    Width = 443
    Height = 116
    Align = alBottom
    DataField = 'MEMO'
    DataSource = DataSource
    TabOrder = 1
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 443
    Height = 117
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 2
    object Panel2: TPanel
      Left = 1
      Top = 1
      Width = 405
      Height = 115
      BevelOuter = bvNone
      Color = 9790720
      TabOrder = 0
      object btOpen: TSpeedButton
        Left = 1
        Top = 1
        Width = 100
        Height = 22
        Caption = 'Open'
        Flat = True
        Transparent = False
        OnClick = btOpenClick
      end
      object btClose: TSpeedButton
        Left = 102
        Top = 1
        Width = 100
        Height = 22
        Caption = 'Close'
        Flat = True
        Transparent = False
        OnClick = btCloseClick
      end
      object btAutoFill: TSpeedButton
        Left = 203
        Top = 24
        Width = 100
        Height = 22
        Caption = 'Append 100'
        Flat = True
        Transparent = False
        OnClick = btAutoFillClick
      end
      object btAddField: TSpeedButton
        Left = 203
        Top = 1
        Width = 100
        Height = 22
        Caption = 'Add field'
        Flat = True
        Transparent = False
        OnClick = btAddFieldClick
      end
      object btDelField: TSpeedButton
        Left = 304
        Top = 1
        Width = 100
        Height = 22
        Caption = 'Delete field'
        Flat = True
        Transparent = False
        OnClick = btDelFieldClick
      end
      object btClear: TSpeedButton
        Left = 304
        Top = 24
        Width = 100
        Height = 22
        Caption = 'Clear'
        Flat = True
        Transparent = False
        OnClick = btClearClick
      end
      object btSave: TSpeedButton
        Left = 102
        Top = 24
        Width = 100
        Height = 22
        Caption = 'Save...'
        Flat = True
        Transparent = False
        OnClick = btSaveClick
      end
      object btLoad: TSpeedButton
        Left = 1
        Top = 24
        Width = 100
        Height = 22
        Caption = 'Load...'
        Flat = True
        Transparent = False
        OnClick = btLoadClick
      end
      object Panel4: TPanel
        Left = 1
        Top = 47
        Width = 152
        Height = 33
        BevelOuter = bvNone
        TabOrder = 0
        object Label1: TLabel
          Left = 5
          Top = 10
          Width = 22
          Height = 13
          Caption = 'Field'
        end
        object edField: TEdit
          Left = 35
          Top = 5
          Width = 111
          Height = 21
          TabOrder = 0
          Text = 'Number'
        end
      end
      object Panel5: TPanel
        Left = 1
        Top = 81
        Width = 403
        Height = 33
        BevelOuter = bvNone
        TabOrder = 2
        object Label5: TLabel
          Left = 5
          Top = 10
          Width = 22
          Height = 13
          Caption = 'Filter'
        end
        object cbFiltered: TCheckBox
          Left = 325
          Top = 7
          Width = 64
          Height = 17
          Caption = 'Filtered'
          TabOrder = 1
          OnClick = cbFilteredClick
        end
        object edFilter: TEdit
          Left = 35
          Top = 5
          Width = 267
          Height = 21
          TabOrder = 0
          OnExit = edFilterExit
        end
      end
      object Panel6: TPanel
        Left = 154
        Top = 47
        Width = 250
        Height = 33
        BevelOuter = bvNone
        TabOrder = 1
        object Label2: TLabel
          Left = 5
          Top = 10
          Width = 27
          Height = 13
          Caption = 'Value'
        end
        object edValue: TEdit
          Left = 37
          Top = 5
          Width = 111
          Height = 21
          TabOrder = 0
          Text = '7'
        end
        object Panel7: TPanel
          Left = 158
          Top = 4
          Width = 87
          Height = 24
          BevelOuter = bvNone
          Color = 9790720
          TabOrder = 1
          object btLocate: TSpeedButton
            Left = 1
            Top = 1
            Width = 85
            Height = 22
            Caption = 'Locate'
            Flat = True
            Transparent = False
            OnClick = btLocateClick
          end
        end
      end
    end
  end
  object OpenDialog: TOpenDialog
    DefaultExt = 'xml'
    FileName = 'Data1'
    Filter = 'Virtual Table Data (*.xml;*.vtd)|*.xml;*.vtd|All Files (*.*)|*.*'
    Left = 416
    Top = 34
  end
  object SaveDialog: TSaveDialog
    DefaultExt = 'xml'
    FileName = 'Data1'
    Filter = 'XML Virtual Table Data (*.xml)|*.xml|Binary Virtual Table Data (*.vtd)|*.vtd|All Files (*.*)|*.*'
    Left = 448
    Top = 34
  end
  object VirtualTable: TVirtualTable
    Filter = 'String LIKE '#39'%1%'#39
    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 = 416
    Top = 2
  end
  object DataSource: TDataSource
    DataSet = VirtualTable
    OnStateChange = DataSourceStateChange
    OnDataChange = DataSourceDataChange
    Left = 448
    Top = 2
  end
end