Faccio una domanda un po' strana, spero di non chiedere la luna e di riuscire a spiegarmi bene.
Supponiamo che in tutte le classi io debba sovrascrivere una procedura in questo modo:

codice:
type

  { TMainForm }

  TMainForm = class(TForm)
  private
    { private declarations }
  protected
    procedure Somma(); override; <---
  public
    { public declarations }
  end;  

procedure TMainForm.Somma(); <---
begin
  ...
end;
E' possibile definire una nuova unit che semplicemente includendola vada a sovrascrivere la procedura già definita nella classe?