Как нарисовать на Paintbox другой формы?

← →
Pavor (2004-04-08 11:05) [0]

Приветствую, уважаемые профессионалы!

Подскажите пожалуйста, как быть?
Ситуация. Есть unit1.pas и, соответственно, Form1. В этом юните запрашиваются данные, по которым производятся вычисления. По результатам вычисления требуется нарисовать графики на Paintbox1 Form2. Че-то не получается никак, не рисует ничего. Вот такой код для эксперимента запускаю - как будто и не рисовал ничего, никакого результата на Form2 не видно. Наверно дело в ShowModal, как мне кажется...

Form2.Canvas.Pen.Style:=psSolid; Form2.PaintBox1.Canvas.Pen.Color:=clBlue; Form2.PaintBox1.canvas.Rectangle(0,0,100,100); Form2.ShowModal;

Спасибо за внимание, надеюсь на помощь...

← →
Алхимик © (2004-04-08 12:25) [1]

TPaintBox не перерисовывается автоматически.
Рисуй на каком нить битмапе и в TPaintBox.OnPaint рисуй этот битмап на канву паинтбокса.

← →
Pavor (2004-04-09 09:19) [2]

Большое спасибо.
Думаю, Paintbox был неправильный выбор :)

Как нарисовать на Paintbox другой формы? Найти похожие ветки