Должен быть битмап с неизменяемой картинкой. Далее копируем этот битмап в другой, куда и выводим текст. А уже полученный битмап выводим куда нужно. На TImage, TPaint или непосредственно на канву формы.
Кстати, в таймере Application.ProcessMessages лишнее.
|