Compare TRect, wie am besten angehen?

[himitsu]

Zitat von hoika:

wenn ich das richtig verstanden habe, willst du von oben nach unten sortieren
und bei gleichem Top von links nach rechts?

Delphi-Quellcode:

Result := CompareValue(R1.Top, R2.Top);
if Result = 0 then
  Result := CompareValue(R1.Left, R2.Left);