2009年8月8日土曜日

overload

function addInt(x,y:integer):string;overload; オンライン
begin
result := intToStr(x + y);
end;

function addInt(x,y,z:integer):string;overload;
begin
result := intToStr(x + y + z);
end;

function addInt(x,y:integer;z:string):string;overload;
begin
result := intToStr(x + y + strToInt(z));
end;

0 件のコメント:

コメントを投稿