Hallo,
in deinem Code herrscht "leichtes" Chaos. Ich verstehe nicht, wieso du 43 TImages nutzt. Es wäre viel sinnvoller, alles intern auf ein TBitmap zu zeichnen und per
Canvas.Draw oder
BitBlt (heißt glaube ich so) auf dein TImage - bzw. besser - auf eine TPaintBox zu zeichnen. Diese arbeitet in der Regel performanter.
Grüße