Einzelnen Beitrag anzeigen

TiGü

Registriert seit: 6. Apr 2011
Ort: Berlin
3.070 Beiträge
 
Delphi 10.4 Sydney
 
#16

AW: Annäherung an Pi mit Monte carlo, paintbox

  Alt 19. Jan 2012, 13:34
Aber kann mir vl jemand erklären, warum ich soviel rumprobieren musste, damit das ganze quadrat zu sehen ist?
Sollen wir jetzt schreiben, dass du es vorher nicht gerafft hast, oder wie?

1. war bei dir wahrscheinlich die Eigenschaften Width und Height (Length gibts nicht!) der Paintbox nicht auf 200 gesetzt (gut in den Screenshots weiter oben zu sehen) und du aber
2. immer konstant auf 200 anstatt wie jetzt auf Width verglichen hast.

Würde übrigens an der Stelle der If-Abfrage das Ergebnis der Wurzel noch per Round() runden, ansonsten werden Gleitkommazahlen mit Integerzahlen
verglichen, was nicht immer gut gehen muss. Der Kompiler castet zwar, aber ich hätte ein sicherers Gefühl.

Ansonsten die anderen Vorschläge mit einarbeiten!
  Mit Zitat antworten Zitat