Главная страница
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.015 c
15-1229420927
LK2008
2008-12-16 12:48
2009.02.08
WebMoney снова зарегить


2-1230282144
_guest_
2008-12-26 12:02
2009.02.08
не работает MaxLength в ValueListEditor


15-1229062972
31512
2008-12-12 09:22
2009.02.08
Вот такой бубен себе хочу!


6-1198485123
DelphiN!
2007-12-24 11:32
2009.02.08
Определить IP адрес клиента через прокси


3-1214894986
zorik
2008-07-01 10:49
2009.02.08
Можна удалить записи только запросом, без хранимки?