关于fastreport中sqrt()(开方函数的问题)(100分)

我使用fastreport，但是里面没有开平方的函数，自己写了一个，但是fastreport怎么算都显示
一个0，真受不了。哪为高手能帮忙解决一下这个问题。

用TfrReport.OnUserFunction事件。简单的范例如下：
procedure TForm1.frReport1UserFunction(const Name: String;
p1, p2, p3: Variant;
var val: Variant);
begin

if AnsiCompareText('SUMTOSTR', Name) = 0 then

val := My_Convertion_Routine(frParser.Calc(p1));
end;

然后你就可以在报表中使用SumToStr函数：）
//家里没有FR,你参考上面的试试,应该不难吧.

谢谢你，解决问题，常联系
EMAIL: geng00@sina.com