为什么a 不能把值传递给b？解决思路

为什么a 不能把值传递给b？
function TForm1.atob(a, b: string):integer;
begin
  b:=a;
  result:=1;
end;

使用：
var s1,s2:stirng;
begin
  s1:='nihao';  
  atob(s1,s2);
  showmessage(s2);//为什么得不到正确的结果'nihao'?
end;

[解决办法]
atob(var a,b:string)
[解决办法]
function TForm1.atob(a: string; var b: string):integer;