Thema: Delphi Bug in PaintBox

Einzelnen Beitrag anzeigen

rajuneon
(Gast)

n/a Beiträge
 
#4

Re: Bug in PaintBox

  Alt 8. Mär 2009, 21:54
Zitat von himitsu:
na kein Wunder ... zwischen den Timeraufrufen könnte der Zeiger verändert werden
und ohne MoveTo vorher, ist der Startpunkt also praktisch gesehn undefiniert und kann sonstwo liegen (auch auf Punkt 0:0)
Ich glaub, da lag der Fehler...
ich habe jetzt unter
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;
das letzte lineto noch ein lineto(0,593) gesetzt.
  Mit Zitat antworten Zitat