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 (желательно без доп. компонент).

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

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