Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.994 c
15-1297078540
Bat-an
2011-02-07 14:35
2011.05.22
Надо вызвать из батника две программы одновременно


15-1296718844
Игорь Шевченко
2011-02-03 10:40
2011.05.22
Опрос: Как вы учитываете изменения в бизнес-процессах


2-1297242329
И. Павел
2011-02-09 12:05
2011.05.22
EOleException появляется, а программа продолжает выполнение


2-1297759890
Scott Storch
2011-02-15 11:51
2011.05.22
как обойти ограничение в 2 Гб. для стримов?


15-1296342105
@!!ex
2011-01-30 02:01
2011.05.22
Delphi ломает hadl linkи




   Наверх