object GeoLegend: TGeoLegend
  Left = 200
  Top = 247
  Width = 171
  Height = 233
  BorderStyle = bsSizeToolWin
  Caption = 'Legend'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnHide = FormHide
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object DG: TDrawGrid
    Left = 0
    Top = 0
    Width = 163
    Height = 206
    Align = alClient
    Color = clSilver
    ColCount = 2
    DefaultColWidth = 30
    DefaultRowHeight = 20
    FixedColor = clWhite
    RowCount = 2
    FixedRows = 0
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    Options = [goFixedVertLine, goFixedHorzLine, goRangeSelect, goRowMoving]
    ParentFont = False
    TabOrder = 0
    OnDblClick = DGDblClick
    OnDrawCell = DGDrawCell
    OnMouseDown = DGMouseDown
    OnRowMoved = DGRowMoved
    ColWidths = (
      30
      885)
  end
end