lazarus-ccr/components/rx/Demos/PhoneBookDemo/pbmainunit.lfm

object pbMainForm: TpbMainForm
  Left = 274
  Height = 446
  Top = 446
  Width = 849
  HorzScrollBar.Page = 848
  VertScrollBar.Page = 445
  Caption = 'pbMainForm'
  ClientHeight = 446
  ClientWidth = 849
  Menu = MainMenu1
  OnCreate = FormCreate
  Position = poDesktopCenter
  object ToolPanel1: TToolPanel
    Height = 23
    Width = 849
    Items = <>
    Align = alTop
    AutoSize = True
    BorderWidth = 4
    TabOrder = 0
  end
  object RxDBGrid1: TRxDBGrid
    Height = 403
    Top = 23
    Width = 849
    Columns = <    
      item
        Title.Alignment = taCenter
        Width = 190
        FieldName = 'PATRONYMIC'
        Filter.ItemIndex = -1
      end    
      item
        Title.Alignment = taCenter
        Width = 150
        FieldName = 'NAME'
        Filter.ItemIndex = -1
      end    
      item
        Title.Alignment = taCenter
        Width = 150
        FieldName = 'SURNAME'
        Filter.ItemIndex = -1
      end    
      item
        Title.Alignment = taCenter
        Width = 130
        FieldName = 'PHONE'
        Filter.ItemIndex = -1
      end    
      item
        Title.Alignment = taCenter
        FieldName = 'ICQ'
        Filter.ItemIndex = -1
      end    
      item
        Title.Alignment = taCenter
        FieldName = 'MEMO'
        Filter.ItemIndex = -1
      end>
    Align = alClient
    FocusColor = clRed
    SelectedColor = clHighlight
    DataSource = Datasource1
    FixedColor = clBtnFace
    Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColumnMove, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete]
    OptionsExtra = [dgeAutoColumns, dgeCheckboxColumn]
    ParentColor = False
    Scrollbars = ssBoth
    TabOrder = 1
    TabStop = True
  end
  object StatusBar1: TStatusBar
    Height = 20
    Top = 426
    Width = 849
    Panels = <>
  end
  object ImageList1: TImageList
    left = 167
    top = 64
  end
  object ImageList2: TImageList
    left = 200
    top = 64
  end
  object ActionList1: TActionList
    left = 167
    top = 120
  end
  object MainMenu1: TMainMenu
    left = 136
    top = 120
  end
  object Dbf1: TDbf
    FilePath = 'C:\Lazarus\components\rxnew\Demos\PhoneBookDemo\bases\'
    IndexDefs = <>
    TableName = 'PhoneBook.DBF'
    TableLevel = 3
    left = 167
    top = 167
    object Dbf1ID1: TLongintField
      AlignMent = taRightJustify
      DisplayWidth = 10
      FieldName = 'ID'
      ProviderFlags = [pfInUpdate, pfInWhere]
    end
    object Dbf1PATRONYMIC1: TStringField
      DisplayWidth = 50
      FieldName = 'PATRONYMIC'
      Index = 1
      ProviderFlags = [pfInUpdate, pfInWhere]
      Size = 50
    end
    object Dbf1NAME1: TStringField
      DisplayWidth = 30
      FieldName = 'NAME'
      Index = 2
      ProviderFlags = [pfInUpdate, pfInWhere]
      Size = 30
    end
    object Dbf1SURNAME1: TStringField
      DisplayWidth = 30
      FieldName = 'SURNAME'
      Index = 3
      ProviderFlags = [pfInUpdate, pfInWhere]
      Size = 30
    end
    object Dbf1PHONE1: TStringField
      DisplayWidth = 20
      FieldName = 'PHONE'
      Index = 4
      ProviderFlags = [pfInUpdate, pfInWhere]
    end
    object Dbf1ICQ1: TStringField
      DisplayWidth = 15
      FieldName = 'ICQ'
      Index = 5
      ProviderFlags = [pfInUpdate, pfInWhere]
      Size = 15
    end
    object Dbf1MEMO1: TMemoField
      DisplayWidth = 10
      FieldName = 'MEMO'
      Index = 6
      ProviderFlags = [pfInUpdate, pfInWhere]
      Transliterate = False
    end
  end
  object Datasource1: TDatasource
    DataSet = Dbf1
    left = 136
    top = 168
  end
end