Ошибка при выводе картинок

SANDIUMS

Ситуация: Есть список записей, которые нужно отобразить в отчете. Одно из полей - номер картинки в TImageList.
Картинку я пишу программно в GetValue:
TfrPictureView * frPicture;
TfrView * frView;
frView = frTheReport->FindObject("StatusPicture");
frPicture = (TfrPictureView*)frView;
frPicture->Picture->Bitmap = Image;
В результате получается, что картинки накладываются одна на другую, т.е. для первой записи - все ОК, для второй - картинка от первой записи, на которую наложена картинка, соответствующая второй записи, и т.д. Как от этого наложения избавиться?

Спасибо!

AlexTZ

Лучше все же картинку обновлять в OnBeforePrint:

if (View->Name == "StatusPicture")
{
frPicture = (TfrPictureView*)frView;
frPicture->Picture->Bitmap = Image;
}

SANDIUMS

Спасибо.
Хотя проблема оказалась не в Fast Report'е. У TImageList аттрибуты BkColor и DrawingStyle были установлены таким образом, что она записывалась как transparent