//要点6: Result 可以参与运算, "函数名"不可以
function MyFun(x,y: Integer): Integer;
begin
  Result := x + y;
  Result := Result * 2;
end;

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