Es steht das zwar auch irgendwo in der
OH, aber grob geht der Vergleich etwa so
(oder man klaut z.B. bei CompareValue:Integer)
Delphi-Quellcode:
if A.xxx < B.xxx then
Result := -1
else if A.xxx > B.xxx then
Result := +1
else {if A.xxx = B.xxx then}
Result := 0;
Meherere Werte vergleichen dann der Reihe nach.
Delphi-Quellcode:
if A.xxx < B.xxx then
Result := -1
else if A.xxx > B.xxx then
Result := +1
else
if A.zzz < B.zzz then
Result := -1
else if A.zzz > B.zzz then
Result := +1
else
Result := 0;