Проблемы с рисованием в Canvas из отдельного потока

[Koshmarovsky]

Значится так...
Работаю в BDS 2006, C++ Builder.
Рисую на канвасе картинку, которая динамически создается при работе программы. Что бы прорисовка работала не зависимо от моих действий над формой, рисую в отдельном потоке. Если ничего не трогать, все работает отлично, но если, скажем, начать шевелить мышкой, то через некоторое рандомное время картинка перестает перерисовываться. Поток продолжает работать, все счетчики пересчитываются, никаких екзепшенов не посылается, просто не перерисовывается канвас.
Провел кучу экспериментов, что бы хоть как-то вычислить событие, после которого возникает косяк (ну, там, при наведении курсора на канвас или нажатие кнопки), никаких причинно-следственных связей не обнаружил.

Немного кода:
Консруктор класса Demonstration

Demonstration::Demonstration ()
{
Thread = CreateThread (NULL, 0,	&Demonstration::ThreadLoop, (unsigned long*)this, NULL, &idThread);
}

Собсна функция потока.

DWORD WINAPI Demonstration::ThreadLoop(LPVOID thisDemo)
{
Demonstration* Demo =((Demonstration*)thisDemo);
while(1)
	{
	Demo->Picture->NextStep();
	some_counter++;
	Sleep(100);
	}
}

Функция NextStep() вызывает функцию прорисовки.

void Frap::NextStep()
{
//различные махинации с данными
this->Draw();
}

Функция Draw() (ни за что не поверите) рисует в Canvas:

void Frap::Draw()
{
//Ну например
for (int i=0; i<PH; i++)
	{
	int* line = (int*)pBitmap->ScanLine[i];
	for (int j=0; j<PW; j++)
		line[j] = RGB(rand()%255, rand()%255, rand()%255);
	}

draw_box->Lock();
draw_box->Draw(0, 0, pBitmap);
draw_box->Unlock();
}

Хелп ми плиз!

[Koshmarovsky]

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

[Koshmarovsky]

Дописал прогу малость. Если поток перезапустить (старый снести, новый начать), все снова работает нормально. До поры до времени...

[Koshmarovsky]

Ан нет! Поток пересоздавать необязательно, можно просто битмап новый сделать в классе Frap... Вот такую функцию написал и на кнопку назначил:

void Frap::Refresh()
{
pBitmap = new Graphics::TBitmap();
pBitmap->PixelFormat = pf32bit;
pBitmap->Height = PH;
pBitmap->Width = PW;
}

Но это костыль получается. Что за дела?

[Пепел Феникса]

а другой поток вообще не должен рисовать
максимум обновлять переменные по которым главный поток сможет перерисовать все как надо, ну и дать главному потоку знать что пора перерисоватся.

[Koshmarovsky]

Усмысле?
Не должен - в смысле не будет работать, или в смысле не стоит так делать?
Рисовать-то он рисует. Временно сделал так: создаю новый pBitmap каждый раз в функции Draw(), использую, и удаляю. Все работает, на быстродействии никак не сказалось. Но это опять таки костыль, хотя получше, чем предыдущий.
Проблем в том, что pBitmap перестает правильно фунциклировать... Хотя указатель на него никуда не девается (ставил BreakPoint, проверял). В чем может быть причина?

[veniside]

Frap::Draw() следует вызывать через Synchronize().
Т.к. у вас свой поток, а не потомок от TThread, то вместо Synchronize() синхронизируйте 2 потока через 2 события, например. Смысл в том, что вся работа с VCL должна выполняться только из главного потока, иначе будут лезть глюки, описанные в вашем первом сообщении.

Кстати, интересно как у вас Demonstration::ThreadLoop() будет работать, ведь при выходе из неё стек очистится на 4 лишних байта.

[Пепел Феникса]

Кстати, интересно как у вас Demonstration::ThreadLoop() будет работать, ведь при выходе из неё стек очистится на 4 лишних байта.

static как я понимаю

[veniside]

Блин, логично )

Ну или надежда на while(1) и TerminateThread()..