//要点4: 多个相同类型的参数可以简化写法
function MyFun(str: string; x,y,z: Integer): string;
begin
  Result := str + IntToStr(x + y + z);
end;

posted on 2008-01-14 21:18  万一  阅读(4022)  评论(0编辑  收藏  举报