在直线上绘制一个点

问题描述

直线方程为 Y = M.X + C,

我有一个点和这些点面对的角度,所以我可以计算出直线方程

Slop := Tan(Rot)  // We  are passing radians to convert to gradient
C := (-Slop*X) + Y // Substitute our point XY values 

这就是我用来获取 Y 截距和斜率或梯度的当前数学方法。

但是我想知道如何在我们的起点前面绘制一个点 X 的距离。

目前,我正在尝试以下操作,其中 Y2 和 X2 是我们原始点的值加上 100 个单位。

 NewPoint.X :=  Round( (Y2 - C) / Slop );
 NewPoint.Y := Round((slop*X2) + C);

这里是完整功能的粘贴箱:

https://pastebin.com/8435NzYc

谢谢。

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)