delphi 基础计算两数之合

本文整理自网络，侵删。

 
program Project;

{$APPTYPE CONSOLE}


function test(a, b: integer): integer; inline;
begin
  Result := a + b;
end;

begin
  writeln(test(5,2));
  Readln;
end




program p1000;
{$APPTYPE CONSOLE}

var
  a, b: integer;

function add(a, b: integer): integer;
asm
  add eax, edx
end;

begin
  read(a, b);
  write(add(a, b));
  readln;
  readln;
end.
 

相关阅读 >>

Delphi打开"我的电脑"等特殊文件夹

Delphi动态创建一个ipedit控件

Delphi 字母大小写转换

Delphi 10进制数与33进制数的转换

Delphi windows api判断文件共享锁定状态

Delphi在桌面上显示文字代码

processid, process handle, window handle 之间的互相转换

Delphi 取正在运行的dll或exe的路径

Delphi txt日志log

Delphi yesterday、today、tomorrow - 昨天、今天、明天

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 基础计算两数之合