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 加载excel 导入数据库

Delphi文件复制函数

Delphi 根据开始和结束符取得中间字符串

Delphi 获取cpu占用时间

Delphi10.2.3解决的一个json问题

Delphi 对话框单元

Delphi gdi+基本用法总结

Delphi 实现最简单的注册机

Delphi listbox防止添加重复

Delphi tms web core messagedlg对话框 yes no

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

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