Delphi运行时写代码实例

Delphi运行时执行代码实例programTest;variSum:integer;functionSum(i,j:Integer):Integer;beginResult:=i+j;end;beginiSum:=Sum(10,25);Writeln(inttostr(iSum));Showmessage(inttostr(iSum));end.