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

Перерисовка компонента   Найти похожие ветки 

← →
JS   (2003-05-21 18:54) [0]

У меня есть компонент, наследующий TGraphicControl
При перерисовке (метод Paint), он рисует не поверх старого рисунка, а сначала стирает его, а уж потом рисует новый.
Как рисовать поверх старого рисунка, т.е. устранить стирание?

Заранее благодарен.

---

← →
Skier ©   (2003-05-21 18:56) [1]

>JS (21.05.03 18:54)
Код.

---

← →
Переяслов Григорий ©   (2003-05-21 19:00) [2]

Нужен код. Но, кажется, ты вызываешь Paint предка.

---

← →
JS   (2003-05-21 20:26) [3]

Исходник скажем такой:
...
procedure MyComp.Paint;
begin
inherited Paint;
Canvas.Rectangle(1,1,40,40);
end;
...

Т.е. я постоянно рисую одно и то же (в данном случае белый квадрат) на том же месте. А мерцание все-равно имеет место.
Как быть?

Заранее благодарен.

---

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

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



Память: 0.45 MB
Время: 0.011 c