Como hacer un SelectAll en un DBGrid

[[sitrico]]

Ya intenté usar el evento OnNewRecord pero tengo el problema que el valor sólo lo puedo calcular el valor usando algunos datos del nuevo registro y en el OnNewrecord todavía no están disponibles.

En cuanto al SelectAll encontré (revizando el código de la unidad DBGrid) que existe una clase llamada TInplaceEdit y que a su vez define varias propiedades y métodos.

  TInplaceEdit = class(TCustomMaskEdit)

  function CreateEditor: TInplaceEdit; virtual;

  property InplaceEditor: TInplaceEdit read FInplaceEdit;

(También hay herederos especializados TInplaceEditorList, TDBGridInplaceEditor)

Pero estas propiedades son "Protected"

El problema lo solucionaría su pudiera de alguna manera aceder al metodo
TCustomDBGrid.InplaceEditor.SelectAll (Que si existe). En alguna parte leí que existe una manera para accesar los métodos y propiedades protegidas de un componente pero no recuerdo donde.

Nota: Preferiría usar el objeto DBGrid Original de Delphi 6.

Gracias