Связывающая линия

[Афанасий[vedma]]

У меня на форме есть Frame1 и Frame2.
Вопрос: как сделать линию между ними?

[volvo877]

На канве нарисовать, используя свойства Left/Top/Width/Height твоих фреймов:

      Self.Canvas.MoveTo(Frame31.Left + Frame31.Width,
                         Frame31.Top + Frame31.Height div 2);
      Self.Canvas.LineTo(Frame41.Left,
                         Frame41.Top + Frame41.Height div 2);

- линия соединит центры правой границы одного фрейма и левой границы другого

[Прик]

В процедуре обработки события OnPaint формы нарисовать линию. Напрмер, горизонтальная рисуется так:

  Canvas.MoveTo(Frame1.Left + Fram1.Width, 100);
  Canvas.LineTo(Frame2.Left, 100);

"100" - для примера, высота линии от верха формы.
Цвет и толщина задается в свойстве Canvas.Pen