Очень давно пользуюсь данным кодом, что бы выводить двухмерную графику на канву. Используется двойная буфферизация.

[Код удалил]

Проект кода для Delphi 7 —  canvas_delphi_7