Hello
I believe there is a wrong line in the unit DiagramUtils of DiagramStudio:
procedure TBlockDrawer.AutoLineTo(X, Y: double);
var
P: TPoint;
begin
if Canvas <> nil then
begin
//P := RoundPoint(PP(X, Y)); ////Wrong Line
P := RoundPoint(RotX(PP(X, Y))); //// Line corrected
Canvas.LineTo(P.X, P.Y);
end;
end;
The error was detected while trying to use the "autoLineTo" procedure.
I could correct the error in my own file. However I thought you are interested to fix it in the original file..
Bishara