Delphi运行时写代码实例

Delphi运行时执行代码实例 program Test; var iSum :integer; function Sum(i, j: Integer): Integer; begin Result := i + j; end; begin iSum := Sum(10, 25); Writeln(inttostr(iSum)); Showmessage(inttostr(iSum)); end.