Delphi-Quellcode:
function TRealImage.getBottomBound: real;
begin
// Falsch !!!
// du greifst auf das Property Bottombound zu
// dies führt zu einem rekursiven Aufruf von getBottomBound mit Stacküberlauf
result:=Bottombound;
// Richtig
result := FBottomBound; // der Wert wird aus einer privaten Variablen gelesen
end;
Alle GetXXXXBound Methoden und alle SetXXXXBound Methoden sind falsch.