//要点5: 函数的返回值可以使用 Result , 也可以使用函数名(但不提倡)
function MyFun1(x,y: Integer): Integer;
begin
  Result := x + y;
end;

function MyFun2(x,y: Integer): Integer;
begin
  MyFun2 := x + y;
end;

posted on 2008-01-14 21:19  万一  阅读(4444)  评论(2编辑  收藏  举报