Thema: Delphi Bug in PaintBox

Einzelnen Beitrag anzeigen

rajuneon
(Gast)

n/a Beiträge
 
#1

Bug in PaintBox

  Alt 8. Mär 2009, 22:05
Hey!

Und zwar habe ich folgendes Problem:
In meiner Paintbox (601*593) habe ich wie folgt eine x- und eine y-Koordinate gezeichnet
Delphi-Quellcode:
procedure TForm1.PaintBox1Paint(Sender: TObject);
begin
Paintbox1.Canvas.MoveTo(0,0);
Paintbox1.Canvas.LineTo(0,593);
Paintbox1.Canvas.MoveTo(0,592);
Paintbox1.Canvas.LineTo(601,592);
// Zeichnen der x- und y-Achse
end;
Außerdem gibt ein Timer diese umgekehrte Parabel aus:
PaintBox1.Canvas.LineTo(xx,yy*(-1)+593); Nun passiert es allerdings (nur beim 1. Kompilieren nach speichern), dass, während die Parabel zur Hälfte gezeichnet ist, eine Diagonale von (0,0) auf den Scheitelpunkt der Parabel gezeichnet wird und die Parabel dann aber ungerührt fortfährt...
Woher kann das kommen?
  Mit Zitat antworten Zitat