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 tbitmap创建时提示object or class type required

Delphi 如何让程序在按了 android 的 back 键后不关闭当前 from 或者不 app 退出

Delphi xe 获取硬盘id序列号

Delphi tcxgrid的tcxgriddbtableview.viewdata.rows跟records有什么区别

Delphi 7 + gdiplus 简单实现双缓冲绘制移动图形

Delphi 编写服务程序的几点总结

Delphi 替换指定字符串的函数

Delphi xe 获取android 系统版本

Delphi 检测应用程序是否已停止响应

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

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