急求 Delphi编写 三次样条插值函数解决方案

急求 Delphi编写 三次样条插值函数
哪位大侠有 Delphi编写 三次样条插值函数？急待解决

------解决方案--------------------
http://download.csdn.net/source/1894278我有VB的例子，你参考一下：

------解决方案--------------------
《常用数值算法丛书 Delphi常用数值算法集》电子书，下一本，里边有。