Hallo leutet könnt ihr mir zufällig sagen was diese if anwendung bewirkt?
if y - radius < Leinwand.ClipRect.Top then
begin
y := Leinwand.ClipRect.Top + radius;
dy := -dy;
end;
if y + radius >= Leinwand.ClipRect.Bottom then
begin
y := Leinwand.ClipRect.Bottom - 1 - radius;
dy := -dy;
end;
if x - radius < Leinwand.ClipRect.Left then
begin
x := Leinwand.ClipRect.left + radius;
dx := -dx;
end;
if x + radius >= Leinwand.ClipRect.Right then
begin
x := Leinwand.ClipRect.right - radius;
dx := -dx;
Das wäre echt nett danke euch im vorraus