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.
 

相关阅读 >>

Delphiwindows 下编译 exe 文件时把一个外部 txt 文件编译到 exe 里面

Delphi java 日期 转换 获取unix时间戳

Delphi2010的操作界面切换到Delphi7的操作模式

Delphi 删除字符串中指定字符

Delphi线程池

Delphi idtcp下载文件

Delphi tnethttpclient https忽略证书验证

Delphi 程序启动后隐藏窗体和任务栏

Delphi 不用控件用函数实现发email

Delphi 清除字符串两边空格或指定字符

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

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