inherited FormPurposefullgrant: TFormPurposefullgrant
  Left = 227
  Top = 192
  Caption = #1050#1086#1076' '#1094#1077#1083#1080
  ClientHeight = 288
  ClientWidth = 488
  PixelsPerInch = 96
  TextHeight = 13
  inherited pnlButton: TPanel
    Top = 236
    Width = 488
    inherited btnClose: TButton
      Left = 354
    end
    inherited btnSelect: TButton
      Left = 420
    end
  end
  inherited pnlTollBar: TPanel
    Width = 488
    inherited tbActions: TToolBar
      Width = 484
    end
  end
  inherited DBTree: TVirtualDBTree
    Width = 488
    Height = 190
    FieldID = cdsDataCODE
    FieldParentID = cdsDataPARENT_ID
    FieldText = cdsDataDESCRIPTION
  end
  inherited stBar: TStatusBar
    Top = 269
    Width = 488
  end
  inherited cdsData: TClientDataSet
    object cdsDataCODE: TLargeintField
      FieldName = 'CODE'
    end
    object cdsDataPARENT_ID: TLargeintField
      FieldName = 'PARENT_ID'
    end
    object cdsDataDESCRIPTION: TStringField
      FieldName = 'DESCRIPTION'
      Size = 1000
    end
  end
end
