X: Integer;
Свойство X определяет координату Х точки.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Point, Point1: IGxPoint;
Link, Link1: IWxLink;
Begin
Point:=New GxPoint.Create(0,0);
Point1:=New GxPoint.Create(10,10);
Link:=UiWorkspace1.WxWorkspace.CreateLink;
Link1:=UiWorkspace1.WxWorkspace.CreateLink;
Link.BeginUpdate;
Link1.BeginUpdate;
Link.FirstPoint:=Point.ToPointF;
Link.LastPoint:=Point1.ToPointF;
Point.X:=43;
Point.Y:=16;
Link1.FirstPoint:=Point.ToPointF;
Link1.LastPoint:=Point1.ToPointF;
Link.EndUpdate;
Link1.EndUpdate;
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку на рабочем пространстве будут созданы две соединительные линии с разными начальными координатами.
См. также: