用var定义的是形参，程序中引用的是实参，实参变量必须是当前存在的有效变量。
如函数声明如下：
function f1(var v1 : integer) : string;
begin
v1 := v1 div 9;
f1 := inttostr(v1);
end;
假如在button1click中调用该函数：
procedure tform1.button1click(sender : tobject);
var
i, v : integer;
s : string;
begin
s := '';
for i := 1 to 100 do
begin
v := i;
if v mod 9 = 0 then
begin
s := s + f1(v) + ','//执行结果是 s = '9,1;18,2;27,3;...99,11;'
s := s + inttostr(v) + ';';
end;
end;
...
end;
你可以找一本Pascal的书看一看。不是我嫌你的问题菜，是因为这样的基础知识最好是能
系统的学习，靠这样在论坛里问，只能得到一个简单的回答，这不是个好的学习方法。
以上是个人浅见，有说的不当处请原谅。
