Wandern mit CopyRect

[Uwe Raabe]

Der dritte Parameter in Bounds gibt die Breite an, nicht den rechten Rand!

function Bounds(ALeft, ATop, AWidth, AHeight: Integer): TRect;