Трабл с TImage

← →
Бадян © (2002-06-29 22:55) [0]

Хай All!

Как можно очистить Image, так, чтобы потом можно было использовать
Image->Picture->Assign(jpg);
Если почистить так Image->Canvas->FillRect(Image->ClientRect), то
Image->Picture->Assign(jpg);
ругается, что Can only modify an image if it contains a bitmap.

Спасибо.

← →
Gonza © (2002-06-30 01:19) [1]

а зачем его очищать??
Image->Picture->Assign(jpg);
и так заменяет рисунок.

← →
kaif © (2002-06-30 04:15) [2]

Можно сделать Bitmap.Assign(nil) (в дельфях, по крайней мере). В синтаксисе билдера не знаю. Одним словом, присвоить пустой указатель. Класс TBitmap умеет в этом случае очистить любые ресурсы.

← →
Бадян © (2002-06-30 12:57) [3]

to Gonza
Image->Picture->Assign(jpg);
рисунок то заменяет, но бывает случай, когда энтого рисунка то нету (рисунки выбираются с базы, но это поле не должно быть обязательно заполненым), и тогда в Image остается прежний рисунок. Что немного кривовато. Поэтому ежели рисунка нету надабно чистить.

to kaif
Вчера пробовал Picture->Assign(NULL) - не работает
Щас попробую Bitmap->Assign(NULL). Как то не додумался.

Image.Picture.Graphic:=nil;

Вероятно Image->Picture->Bitmap->Assign(NULL);

Трабл с TImage Найти похожие ветки