Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.02.08;
Скачать: CL | DM;

Вниз

TImage, стирание картинки   Найти похожие ветки 

 
workbench   (2008-12-29 17:40) [0]

Загружаю картинку в 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 17:42) [1]

> [0] workbench   (29.12.08 17:40)

что значит стереть? попробуй Image.Picture.Bitmap.Canvas.FillRect();


 
workbench   (2008-12-29 17:49) [2]


> Eraser


да, так он хотя бы затирает, спасибо, только цвет заливки не тот что указываю в Image.Picture.Bitmap.Canvas.Color, буд-то бы он его ещё с чем-то смешивает(


 
Jeer ©   (2008-12-29 18:08) [3]

img.Picture.Assign(nil);
или
img.Picture := nil;


 
Eraser ©   (2008-12-29 18:33) [4]

> [2] workbench   (29.12.08 17:49)


> Image.Picture.Bitmap.Canvas

Image.Picture.Bitmap.Canvas.Brush.Color := clRed;

RTFM в общем.



Страницы: 1 вся ветка

Текущий архив: 2009.02.08;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.012 c
13-1122370594
Tab
2005-07-26 13:36
2009.02.08
vcl программы на delphi 8 for .net?


8-1190348540
BAHO_KEX
2007-09-21 08:22
2009.02.08
Как добавить в ListBox имена файлов


15-1228389664
ANB
2008-12-04 14:21
2009.02.08
Кризис добрался до меня


15-1228573398
DeadMeat
2008-12-06 17:23
2009.02.08
GPS vs ГЛОНАСС


2-1230373858
antonn
2008-12-27 13:30
2009.02.08
создание переменных в cmd