Delphi zählt falsch

[Coder]

Hallo!
ich habe Delphi 3 Pro und möchte einen Algorithmus schreiben, der ein Bild automatisch aus einem TextString heraus generiert.

Doch , wenn ich das Programm ausführe "kann es" manchmal sein [das ist nicht immer],
daß wenn ich den Text im Memo1.text verändere , also noch Zeichen davor schreibe, daß der Ergebnisstring jedes Mal anders aussieht, und Delphi auch derbe Fehlermeldungen [Zugriffsverletzungen] zeigt. Und, man kann es provozieren, wenn man mehrmals nacheinander auf die Buttons drückt.
Weiß jemand, woran das liegt?

Denn "Colord" dürfte sich nicht von Mal zu Mal verändern, da es ja jedes Mal aus EDIT ausgelesen wird.
Nicht aus dem veränderte Memo1.

hab mal den wichtigsten Source in ein extrap Projekt extrahiert [läuft auch in der einfachen Form fehlerhaft] und 2 Bilder raufgeladen [65 kb]
http://rapidshare.de/files-de/366296/inet.zip.html

Passwort ist : board

[sorry, für das beschissene Einrücken, aber ich wollte es original belassen]

ich hoffe, mir kann jemand helfen.