Вниз
Скачать: CL | DM;

OnPaint у панели TKOLTabControl   Найти похожие ветки 

← →
Ал   (2004-01-29 12:25) [0]

У TKOLTabControl несколько закладок. Хочу по onPaint у одной из панелей TKOLPanel рисовать прямо на ее поверхности.
Получается ерунда: то, что рисую - прорисовывается, а вот сама панель не прорисовывается (остаются куски предыдущих изображений).
Причем, достаточно лишь определить onPaint для этой панели и ничего не делать, панель не перерисовывается!

Подскажите, как правильно рисовать на одной из закладок TKOLPanel у TKOLTabControl? Пробовал PaintBox - другая ерунда: TKOLPanel не прорисовывается, пока у PaintBox не сделаешь Transparent := True.


← →
Ал   (2004-01-29 16:03) [1]

Похоже, я неправильно пользуюсь onPaint?

Если определяю для контрола, лежащего на TKOLTabControl, обработку onPaint:

procedure TForm3.EditBoxPaint(Sender: PControl; DC: HDC);
begin
// Ничего!
end;

то контрол и не перерисовывается!

Ожидал, что эта процедура не заменяет, а дополняет стандартную прорисовку. Или не так?


← →
Ал   (2004-01-29 16:43) [2]

Как же тогда нарисовать что-то на TKOLPanel, чтобы оставшаяся часть перерисовывалась сама?


← →
<Falcon>   (2004-01-29 17:15) [3]

Если используешь onPaint вся отрисовка ложится на тебя.


← →
Ал   (2004-01-29 17:29) [4]

Хорошо, а как тогда, если без onPaint.
Мне просто нужно нарисовать небольшой рисуночек, но не перекрывающий всю TKOLPanel (желательно без доп. компонент).


← →
savva ©   (2004-01-29 17:38) [5]

Panel1.Canvas.MoveTo(1,1);
Panel1.Canvas.LineTo(10,10);



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

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



Память: 0.45 MB
Время: 0.021 c
3-1085502140
Kein
2004-05-25 20:22
2004.06.20
переход с IBX на FIBPlus


14-1086361466
Ig
2004-06-04 19:04
2004.06.20
Работа с TStrings


14-1086314387
Kair
2004-06-04 05:59
2004.06.20


3-1085755483
ceval
2004-05-28 18:44
2004.06.20
как посредствам ADOTable связать две таблицы


3-1085489342
Reostat
2004-05-25 16:49
2004.06.20
База и программа на разных машинах.




   Наверх