"lala.exe funktioniert nicht mehr"-Meldung nach Programmende

[Hedge]

In meinem Programm wähle ich nach dem Start in einem TOpenDialog eine Datei aus.
Danach wird dieses verkleinert und gespeichert.
Wenn ich nun das Programm schließe friert es ein für ca. 15 Sekunden und dann erscheint unter Windows 7 (build 7100) die Meldung die auf dem Bild im Anhang zu sehen ist.

Durch ausprobieren habe ich das Problem auf 1 Zeile Code eingrenzen können.
Das ist entweder:

Ergebnis:= ResizeBitmap(Bitmap, 16,16); (die Funktion habe ich da gefunden: http://www.swissdelphicenter.ch/de/showcode.php?id=1463)
oder

Ergebnis.Canvas.StretchDraw(Rect(0,0, 16, 16),Bitmap); Wenn ich weder die eine, noch die andere Zeile verwende, dann tritt das Problem nicht auf.

Wenn ich die .exe normal starte und nicht aus dem Editor raus, dann tritt das Problem auch nicht auf.

Hat Jemand Rat?