Einzelnen Beitrag anzeigen

Scorp

Registriert seit: 13. Jan 2008
5 Beiträge
 
#9

Re: ZUfälliges Panel aufleuchten lassen

  Alt 19. Jan 2008, 22:44
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
  Mit Zitat antworten Zitat