自定义函数如下
Function hq_sum(var hh:array of String):Integer;
var i,tst:Integer;
begin
tst:= 0;
For i:= 0 To 5 do
tst:=tst+ CInt(hh(i));
result:=tst;
end;
end;
hh是个一维数组形参,为何不对?正确该如何写?另外怎么在程序中用数组实参调用?aaa:=hq_sum(bs(6))对么?
请高手指正。
Function hq_sum(var hh:array of String):Integer;
var i,tst:Integer;
begin
tst:= 0;
For i:= 0 To 5 do
tst:=tst+ CInt(hh(i));
result:=tst;
end;
end;
hh是个一维数组形参,为何不对?正确该如何写?另外怎么在程序中用数组实参调用?aaa:=hq_sum(bs(6))对么?
请高手指正。
解决方案 »
- image控件如何显示memorystream 从idhttp中get的图象??
- 请问这段bcb代码怎么改写成Delphi?
- 如何实现在两程序间共享大于256字节的字符串资源?(内存共享)
- 如何检测应用程序是否结束?
- 有武汉愿意交流的程序员吗?有空的成立个组织或工作室吧
- stringgrid.canvas.textrect()中的参数问题
- Delphi下的加密利器cipher控件(带源码)。
- 取得用户在dbgrid中刚刚输入的数据(baniu先生的问题),最好的办法是????
- 我的主明细表为什么无法将明细记录删除,语句都有执行,但库中还有,请指点
- 类转换问题
- 如何自己做日历控件?
- QQ那样的栏目菜单怎么做的啊?
2.CInt如果不是自定义函数的话应该是strtoint
好象以前是写asp还是vb的,呵呵