![]() |
|
|
#1
|
|||
|
|||
![]() Привет всем!
Возникла вот проблема: мне необходимо рисовать на форме линию(допустим соединить 2 объекта). Пробовал , но если свернуть окно а потом его восстановить все нарисованые линии ичезают. Как этого избежать? Код:
procedure Form1OnMouseDown() Canvas.MoveTo(X,Y); : : proceduer Form1OnMouseUp() Canvas.LineTo(X,Y); : : ![]() |
#2
|
||||
|
||||
![]() Используй событие OnPaint формы! И в нем перерисовывай все, что тебе надо.
|
#3
|
|||
|
|||
![]() у меня подобный вопрос: как прорисовывать линию каждый раз когда меняется положение этих объектов(например, через drag&drop).
|
#4
|
||||
|
||||
![]() Если такая соединяющая линия будет использоваться более одного раза, то я порекомендовал бы сделать ее отдельным объектом (типа TConnectLine) который бы сам себя отрисовывал, и, главное, имел два свойства TFirstObject, TSecondObject в которых бы содержались ссылки на соединяемые объекты.
|
#5
|
|||
|
|||
![]() Необходимо вывести на печать содержимое PaintBox т. е рисую на нем
набор прямых и окружностей и их нужно вывести на печать. Как это можно сделать. Растровую картинку с компонета Image выводит на печать без проблем. |