[poli-smen]

Сообщение от hsMapk

Buf.Free; а куда именно это вставить?в конце таймера?

Да. Или вообще лучше один раз его создавать в FormCreate и один раз удалять в FormDestroy - так будет производительнее.
Да и прорисовку лучше делать не по таймеру, а по нужде - через FormPaint или на компоненте TPaintBox через его событие OnPaint.
И TImage в данном случае тоже вполне себе подойдёт, но на нём лучше не завязываться.