| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TImage, стирание картинки
workbench © (2008-12-29 17:40:00)Загружаю картинку в TImage, после этого мне эту картинку надо удалить, сам TImage всё ещё нужен, грузится нормально, а удалить - никак не получается, уже чего только не писал, вот варианты:
Image.Picture.Bitmap.FreeImage;
Image.Picture.Bitmap.ReleaseHandle;
Image.Canvas.Brush.Color := clBtnFace;
Image.Canvas.FillRect(Image.ClientRect);
Image.Repaint; Image.Refresh; Self.Repaint; Self.Refresh;
Image.Hide; Image.Show; Image.Invalidate
один фиг изображение не затирается, если окно свернуть-развернуть, то оно пропадёт, а по нормальному как его закрыть?
Eraser (2008-12-29 18:33:00) [1]> [2] workbench (29.12.08 17:49)
> Image.Picture.Bitmap.Canvas
Image.Picture.Bitmap.Canvas.Brush.Color := clRed;
RTFM в общем.
Jeer (2008-12-29 18:08:00) [2]img.Picture.Assign(nil);
или
img.Picture := nil;
workbench (2008-12-29 17:49:00) [3]
> Eraser
да, так он хотя бы затирает, спасибо, только цвет заливки не тот что указываю в Image.Picture.Bitmap.Canvas.Color, буд-то бы он его ещё с чем-то смешивает(
Eraser (2008-12-29 17:42:00) [4]> [0] workbench (29.12.08 17:40)
что значит стереть? попробуй Image.Picture.Bitmap.Canvas.FillRect();
| |
