Hi,
I like to prevent move of line endpoints connected to a specific LinkPoint on the FlowActionBlock. Tried with following code to add a restriction to the box LinkPoints[2].Anchor but the code crasch when I create next box and connect it with the last one.
NewBox := TFlowActionBlock.Create(TrpDiagram.Owner);
MyLine := TDiagramSideLine.Create(TrpDiagram.Owner);
with MyLine do
begin
Diagram := TrpDiagram;
SourceLinkPoint.AnchorLink := ParentBox.LinkPoints[3]; //link start point to someblock
TargetLinkPoint.AnchorLink := NewBox.LinkPoints[2]; // link end point to
NewBox.LinkPoints[2].Anchor.Restrictions := [crNoMove];
end;
What am I doing wrong here, is there another way?
/ Dag