Hola...
Los objetos no se heredan, solo las clases...
Y no tienes que heredar de nada... solo haces:
Código Delphi
[-]
unit MiUnidad;
interface
uses
procedure Procedimiento1(Parametro1: TipoParametro);
function Funcion1(Parametro1: TipoParametro): Integer;
implementation
uses
procedure Procedimiento1(Parametro1: TipoParametro);
begin
end;
function Funcion1(Parametro1: TipoParametro): Integer;
begin
end;
end.
Saludos...