小编sak*_*vel的帖子

Delphi 7是否支持inline关键字?

procedure display;inline;
begin
  showmessage('sakthi');
end;

procedure TFrmInline.BtnDisplayClick(Sender: TObject);
begin
  display;
end;
Run Code Online (Sandbox Code Playgroud)

在这个程序中,如果我编译它显示错误"声明预期但内联发现".

delphi delphi-7

4
推荐指数
1
解决办法
561
查看次数

请使用export和stdcall关键字来区分使用delphi7导出Dll中的函数

uses
  SysUtils,
  Classes;

{$R *.res}
function add(Value1:integer;value2:integer):integer;stdcall;
begin
  Result:=Value1+value2;
end;

function subtract(Value1:integer;value2:integer):integer;stdcall;
begin
  Result:=Value2-value1;
end;

function multiply(Value1:integer;value2:integer):integer;stdcall;
begin
  Result:=Value1*value2;
end;

function divide(Value1:integer;value2:integer):integer;stdcall;
begin
  Result:=Value2 div value1;
end;

function check(Value1:integer;value2:integer):Boolean;stdcall;
begin
  if(Value2>value1)then
    Result:=True
  else
    Result:=False;
end;

exports add,subtract,multiply,divide,check;
Run Code Online (Sandbox Code Playgroud)

这是我的DLL代码.即使我给出口它是有效的.我可以知道这两个关键字的使用之间的区别.

delphi delphi-7

1
推荐指数
1
解决办法
294
查看次数

标签 统计

delphi ×2

delphi-7 ×2