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

Вниз

Как вывести а потом стереть текст на канве Image?   Найти похожие ветки 

 
Aleks   (2009-10-05 10:50) [0]

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


 
brother ©   (2009-10-05 11:08) [1]

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


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

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

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


 
brother ©   (2009-10-05 11:39) [3]

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


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

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

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


 
brother ©   (2009-10-05 12:04) [5]

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


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

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


 
brother ©   (2009-10-06 04:41) [7]

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



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

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

Наверх




Память: 0.47 MB
Время: 0.007 c
1-1254923974
Agat2
2009-10-07 17:59
2011.05.22
из Delphi 2007 -> 2010


15-1296137787
Кто б сомневался
2011-01-27 17:16
2011.05.22
Project Options


2-1297096029
Женя
2011-02-07 19:27
2011.05.22
Распознание символов


15-1296854977
Юрий
2011-02-05 00:29
2011.05.22
С днем рождения ! 5 февраля 2011 суббота


2-1297500327
Fil-23
2011-02-12 11:45
2011.05.22
Привести в нормальный вид синтаксис