Verständnis bon Class TRect Definition

[Uwe Raabe]

Zitat von bernhard_LA:

wie steuere ich denn ob TRect nur durch 2 TPoints oder 4 Integer Werte aufgespannt wird ?
...

Delphi-Quellcode:

 case Integer of
    0: (Left, Top, Right, Bottom: FixedInt);
    1: (TopLeft, BottomRight: TPoint);
  end;

Die Darstellung ist im Speicherlayout identisch. Ein TPoint ist ja auch nichts anderes als zwei FixedInt-Werte für X und Y. Daher gilt

Delphi-Quellcode:

Left = TopLeft.X
Top = TopLeft.Y 
Right = BottomRight.X
Bottom = BottomRight.Y

Es ist also völlig egal, über welches Create das TRect erzeugt wurde oder ob die Werte direkt zugewiesen wurden und wie es behandelt wird. Es kommt immer dasselbe raus.