Klasse an Klasse gleichen Typs übergeben

[3_of_8]

Das ist nicht sonderlich gut. Der Rest deines Stils IMHO auch nicht ganz einwandfrei.

Delphi-Quellcode:

TMatrix = class(TObject)
protected
  FDA_e: TDA_e;
{Schnipp}
public
  class function Multiply(m1, m2: TMatrix): TMatrix;
  function Multiply(m2: TMatrix): TMatrix;
{Schnipp}
end;

{Schnipp}

implementation

class function TMatrix.Multiply(m1, m2: TMatrix): TMatrix;
var I, J: Integer;
begin
//Iteriere über alle Matrizenelemente von m1 und m2 mit I und J als Indizes und multipliziere
//kreuzweise, speichere Ergebnis in Result
end;


function TMatrix.Multiply(m2: TMatrix): TMatrix;
var I, J: Integer;
begin
//Iteriere über alle Matrizenelemente von self und m2 mit I und J als Indizes und multipliziere
//kreuzweise, speichere Ergebnis in Result
end;

So würde ich das machen.

Sieh dir mal die Delphi Code-Konventionen an.

Achja, das ist übrigens nur meine Meinung, die ist selbstverständlich NICHT repräsentativ.