绘制双曲线的函数，要求好的算法可以达到圆滑精致(200分)

R

riverfeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-11

• #1

procedure DrawHyperbolas(ParamA, ParamB: Single;
var Points;
Array of TPoint)；
如上一个过程返回的Points即可。
我自己通过方程以一定间隔通过方程描点，
但是发现结果不是很好，在中轴X附近的还可以，但是外边的曲线太不理想，可能由于取整的关系
几乎都成了直线。
那位高手能帮忙解决一下

 

L

lha

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-11

• #2

能否将具体的情况讲一下？
“以一定间隔通过方程描点”
是否“间隔”取的不好？
”几乎都成了直线“
画图比例不合适？
你可以先将用来画曲线的数据输出到文件中，分析一下，看看数据是否本身就这样？
还是程序不对？

 

L

Lera

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-12

• #3

我觉得最可能是显示嚣分辩率的原因。
我做试验，无论如何细分，不可能在屏幕上无限制的平滑下去，这是显示器的原因。
放到激光打印机中打出来就可以看出来。

 

老

老赵

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-12

• #4

我这里有一个专画曲线的控件，但没试过。你要不要？(mathimage)

 

R

riverfeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-12

• #5

MathImage,我有，好像没有画双曲线的函数。
方程就是： (X^2 / a^2) - (Y^2/ b^2) = 1 这样个东西嘛，就是要将这个方程曲线
画出来呀。
如能够达到较好 的 效果就行了，，， 哪位老兄来切磋切磋

 

R

riverfeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-12

• #6

>>lera
其实，windows 的画椭圆函数不是画的挺好的嘛，
双曲线也是类似的，只是没有找到好的算法而已

 

R

riverfeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-15

• #7

多人接受答案了。