In deinem Quellcode (function TFigur.PixelKollision(Farbe : TColor): TKollision; ) hab ich das gefunden
Zitat:
for yi := 0 to Width do begin
for xi := 0 to Height do begin
y ist normalerweise die höhe
x die breite hier hast du es umgekehrt.
Liegt es daran ?
//Edit doch net in deinem testprogramm hast du ja feste werte