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.