828
社区成员
发帖
与我相关
我的任务
分享函数问题
以一个函数为例
function TfrmMain.func(i: integer): integer;
begin
Result := i + i;
end;
我想写成这样
function TfrmMain.func(i: integer; iResult: integer): integer;
然后返回值在iResult里。
也就是原来的函数这样调用:
iResult:= func(1);//iResult = 2
但我想这样用
func(1,iResult);//iResult =2
这个函数应该怎么写？
function TfrmMain.func(i: integer): integer;
begin
Result := i + i;
end;
我想写成这样
function TfrmMain.func(i: integer; iResult: integer): integer;
然后返回值在iResult里。
也就是原来的函数这样调用:
iResult:= func(1);//iResult = 2
但我想这样用
func(1,iResult);//iResult =2
这个函数应该怎么写？
...全文
请发表友善的回复…
发表回复
cuteant 2006-04-24
- 打赏
- 举报
同意楼上的说法，改为Var iResult就可以直接修改了
goldli 2006-04-24
- 打赏
- 举报
把iResult改下，改成 VAR iResult:integer
gulf1234 2006-04-24
- 打赏
- 举报
不明白，你是不是要实现递归啊？
KL2 2006-04-24
- 打赏
- 举报
如果加了var呢？
cuteant 2006-04-24
- 打赏
- 举报
如果是TStringList，不需要Var就可以修改了
KL2 2006-04-24
- 打赏
- 举报
原来StringList也可以，只是我写高错了名字，现在可以了
cuteant 2006-04-24
- 打赏
- 举报
StringList是指针，不同于普通的变量
把你写的贴出来看看
把你写的贴出来看看
KL2 2006-04-24
- 打赏
- 举报
可以了，谢谢高手解答
但我刚才用StringList作返回值却不可以。
为什么？
但我刚才用StringList作返回值却不可以。
为什么？
