1) В модуле с потоком приготовь заранее процедуру синхронизации с главной формой.
2) Что за битмап? Битмап надо передать главной форме в процедуре синхронизации.
3) Как правило: всё, что принадлежит главной форме (размер её компонентов, сами компоненты и т.д.), считывается или изменяется только в процедуре синхронизации. (Иначе глюков не оберёшься)
4) Form1.PaintBox1Paint(Form1) - не надо nil-ов в потоках. Кто-то должен отвечать за происходящее в системе.
|