DBGrid mit festen Spalten

[dnalor]

Da TDBGrid standardmäßig über kein Property FixedCols, wie TCustomGrid, verfügt bin ich so vorgegangen:
Type TMyGrid=class(TCustomGrid)

Bei OnCreate des Formulars folgender Code:
TMyGrid(DBGrid1).FixedCols=2 bei aktiven dgIndicator

Es wird auch eine feste Spalte dargestellt.
Leider gibt es zwei hässliche Nebeneffekte
1. Die Titelbezeichnungen der festen Spalten werden nicht dargestellt
2. bei einem klick auf die feste Spalte wird diese rechts daneben noch einmal angezeigt

Hat jemand einen Vorschlag?