Annäherung an Pi mit Monte carlo, paintbox

[Borgschüler]

ok wenn ich paintbox1.invalidate oder paintbox1.repaint schreibe, verschwindet das gezeichnete. ich erklär mir das dadurch, dass die paintbox in den urzustand versetzt wird??

auf jedenfall danke leute, für die ganzen vorschläge!

[einbeliebigername]

Hallo,

Zitat von Borgschüler:

ich erklär mir das dadurch, dass die paintbox in den urzustand versetzt wird??

Ne, Falsch. Invalidate und Repaint bewirken das sich die PaintBox neuzeichnet. Beim Neuzeichnen geht die PaintBox immer wie folg vor:
1. Füllen der Zeichenfläche mit der Farbe, die bei Color angegeben ist
2. Auslösen des Ereignisses OnPaint

Da bei dir aber keine Behandlung dieses Ereignisses existiert wird auch nichts gezeichnet und die PaintBox bleibt leer. Das was man mit Invalidate und Repaint selbst auslösen kann, stößt auch Windows von sich aus an. Windows lässt sich an dieser Stelle aber nur schwer kontrollieren. Man muss immer daran denken, dass jederzeit Windows auf die Idee kommen kann, das komplette oder teilweise Neuzeichen eines Fensters anzustoßen. Auch die VCL löst unter Umständen das Neuzeichnen aus

Einbeliebigername.

[Aphton]

Nenenenene..

Also es liegt daran, weil deine Paintbox nicht quadratisch ist (die Positionierung hat damit also nichts zu tun, sondern die Dimensierung)

Mach einfach folgendes irgendwo zu Beginn der Anwendung (FormCreate)

Delphi-Quellcode:

  PaintBox1.Width  := 250;
  PaintBox1.Height := PaintBox1.Width;

Edit (Erklärung, warum):

Zitat:

   if (sqrt(x*x+y*y) < 200) then

Heißt soviel wie, wenn die Länge des Richtungsvektors A (x, y) (x, y relativ zum Ursprung -> bei der Paintbox ist es die linke obere Ecke) < 200, dann markiereden Pixel bei aX, aY rot, sonst grün.

200 ist dein Radius. Wenn du eine Paintbox benützen willst, die nicht quadratisch ist (was ja, wenn man ein Kreis "einzeichnen" will, sinnlos ist), dann müsstest statt 200 die kleinere Dimensionskomponente der Paintbox nehmen - sei es nun Width oder Height -> damit der ganze Kreis anschließend auch sichtbar wird!