随笔 - 2146  文章 - 97 评论 - 11767 trackbacks - 253

//要点2: 过程和函数都可以有一个或多个参数; 参数用 ; 号分割
procedure MyProc(i: Integer);
begin
  ShowMessage(IntToStr(i));
end;

function MyFun(x: Integer; y: Integer): Integer;
begin
  Result := x + y;
end;
posted on 2008-01-14 21:14  万一  阅读(...)  评论(...编辑  收藏