Hi,
es schmiert in TListe.getElem() ab. Und zwar hier:
Delphi-Quellcode:
IF NOT endpos
THEN result := current.next.value // Bumm
ELSE result := NIL
Vermutlich setzt du next in den anderen Funktionen nicht richtig. Ausserdem ist mir aufgefallen, dass du bei TBlock.draw den Speicher nicht wieder freigibst, der von "k.copy" reserviert wird. Leider muss ich mich auf "fünftens" von mimi anschließen, das ist alles nicht gerade schön oder optimal, aber das hilft dir wohl jetzt nicht besonders weiter, weil die Zeit so knapp ist
...