Wenn du dem Array ein Typ gibst kannst du es auch durchreichen:
Delphi-Quellcode:
Type
Tmein2DArray = Array of Array of Integer;
// und später
meinArray : Tmein2DArray;
function CompareMyArray(X:Tmein2DArray;a,b:integer):integer;
const
VERGLEICHINDEX = 0;
begin
if X[VERGLEICHINDEX][a] > X[VERGLEICHINDEX][b] then
result := 1
else if X[VERGLEICHINDEX][a] > X[VERGLEICHINDEX][b] then
result := -1
else
result := 0;
// Hinweis: mit Sign() geht es einfacher und eleganter
end;
Noch besser wäre es, wenn du das Array sammt Compare-, Swap- und Sortierfunktion in einer Klasse verpacken würdest.