Hilfe bei Thema Klassen und Vererbung gesucht

[DocE]

Das Problem ist folgendes:

In TWorld.Create schreibst Du

height:=round((7 div 10)*raster*size); 1. (7 div 10) ist immer 0, und 0 * irgendwas ist wieder 0, damit ist die höhe immer 0!
2. in SetSize von TWorld fehlen die Klammern, ändert aber nichts am 0 Ergebnis, weil er jetzt 7 durch eine noch größere Zahl dividiert:

height:=round(7 div 10*raster*size); Richtig wäre:

height := round( (7 / 10) * raster * size); Der gleiche Fehler exisitiert vermutlich auch in den anderen Typen.


Grüsse
...Doc