Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Очистка Canvas на Timage [D7, XP]


maxXP ©   (2006-11-27 16:56:00) 

Рисую на Timage через Canvas. Вкартинку загружена картинка (сетка), как эффективно очищать нарисованное, чтобs оставалась только сетка.


RASkov   (2006-11-28 03:54:00) [1]

> Вкартинку загружена картинка (сетка), как эффективно очищать
> нарисованное, чтобs оставалась только сетка

Перезагрузить картинку(сетку).
или [3].
FillRect()
и нарисовать сетку с помощью Pen вместо предложенного Brush, но... видимо имелось ввиду
у Brush Canvas'a Image'са есть свойство BitMap  и тогда так

Image1.Canvas.Brush.Bitmap.LoadFromFile('setka.bmp');
Image1.Canvas.FillRect(Image1.Canvas.ClipRect);


DVM   (2006-11-27 17:08:00) [2]


> как эффективно очищать нарисованное, чтобs оставалась только
> сетка

FillRect()

а сетку рисуй с помощью Brush


maxXP   (2006-11-27 17:04:00) [3]


....
Image1.Picture.LoadFromFile('Setka.bmp');

цикл1
>>вот тут очистить Image1.canvas до начального состояния
...цикл2
Image1.canvas.pixels[x,y]:=ColorBox1.Selected;
...цикл2

цикл1


Сергей М.   (2006-11-27 16:57:00) [4]


> Вкартинку загружена картинка (сетка)


Это как ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо