Stringgrid'de hücre seçili geliyor

[hdayi]

Merhaba,

Bi string grid kullanıyorum. Options'ta goDrawFocusSelected False olarak seçili.
Ama hala 0,0 hücresi seçilli olarak geliyor. Neden olabilir, nasıl düzeltebilirim?
dfm dosyasından özellikler:

Kod: Tümünü seç

    object grdEczane: TStringGrid
      Left = 35
      Top = 30
      Width = 137
      Height = 120
      Cursor = crHandPoint
      Color = 16744576
      ColCount = 2
      Ctl3D = True
      DefaultColWidth = 65
      DefaultRowHeight = 15
      FixedCols = 0
      RowCount = 50
      FixedRows = 0
      Options = [goHorzLine]
      ParentCtl3D = False
      ParentShowHint = False
      ScrollBars = ssNone
      ShowHint = False
      TabOrder = 0
      OnClick = pnlEczaneClick
      OnDrawCell = grdEczaneDrawCell
      OnMouseMove = grdEczaneMouseMove
      ColWidths = (
        78
        53)
    end

Teşekkürler...

[hdayi]

Sonradan anladım ki başka bir bileşene focus olunca seçili oluyormuş.
Bi kod buldum gridin ondrawcell olayına yazdım.

Kod: Tümünü seç

var
    gr: TgridRect;
begin
    GR.Left := -1;
    GR.Top := -1;
    GR.Right := -1;
    GR.Bottom := -1;
    StringGrid1.Selection := GR;
end;