X: Integer;
The X property determines the coordinate of the X point.
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;
After executing the example clicking the button creates two connecting lines with different initial coordinates on the workspace.
See also: