[ecfisa]

Es más Livey, al ser GetEditText un método de la clase TCustomGrid, podés redefinir el método para cualquiera de sus descendientes...

Así podés hacer:

Código Delphi [-]
uses DBGrids;

type
 TDBGrid = class(DBGrids.TDBGrid)
  public
    function GetEditText(ACol,ARow: Longint):string; override;
  end;

 TForm1 = class(TForm)
    DBGrid1: TDBGrid;
 public
 private
 end;
....
implementation

function TDBGrid1.GetEditText(ACol, ARow: Integer): string;
begin
  Result := Inherited GetEditText(ACol,ARow);
end;

con el mismo resultado.


Saludos.