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

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

Как вывести а потом стереть текст на канве Image? [D7, WinXP]


Aleks ©   (2009-10-05 10:50:00) 

Как вывести а потом стереть текст на канве Image? Пробовал так Image1.Canvas.TextOut(0,0,'some text'), текст выводится. Но стереть потом не могу никак, refresh, Repaint, Invlidate, FillRect(Rect) ничего не помагает. На Image загружен белый фон, Transparent:=true.


brother   (2009-10-06 04:41:00) [1]

автору, этот топик не в основной должен быть, это на будущее...


Aleks   (2009-10-05 12:47:00) [2]

Спасибо за помощь,тем кто откликнулся новичку!!


brother   (2009-10-05 12:04:00) [3]

да автор уже слинял видимо...


Омлет   (2009-10-05 11:59:00) [4]

> brother ©   (05.10.09 11:39) [3]

Только после этого надо не забыть Image1.Repaint, т.к. рисуется напрямую в HDC, и для Image.Canvas не происходит Changed.
И если цвет точно всегда белый, то лучше вместо PATCOPY использовать WHITENESS.


brother   (2009-10-05 11:39:00) [5]

with Image.Canvas do
 begin
   Brush.Color:= clWhite; // пробуй другие цвета
   PatBlt(Handle, 0, 0, Image.Width, Image.Height, PATCOPY);
 end;
???


Омлет   (2009-10-05 11:32:00) [6]

> FillRect(Rect) ничего не помагает.

FillRect не мог не помочь. Проверь Brush.Style.


brother   (2009-10-05 11:08:00) [7]

ты разделом ошибся...


Наверх

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