Delphi 系统[16]关键字和保留字 cdecl、pascal、stdcall、safecall、register、varargs - 调用约定


Delphi 系统[16]关键字和保留字  cdecl、pascal、stdcall、safecall、register、varargs  - 调用约定

1、定义:

  • cdecl :规定了从 C 或 C++ 编写的 DLL 中调用函数所必须遵守的规则。它可以将 C 或 C++ 中的数据类型转换为Delphi 的类型。 
  • pascal :规定参数从左向右传递。函数调用时要对所有的变量进行初始化,避免因异步线程调用而产生的错误,保留它是为了向下兼容。 
  • stdcall :规定参数从右向左传递。同时 stdcall 规定, 被调函数是大小写敏感的。在调用函数时,如果函数名中有一个字符的大小写出错,则该函数将调用失败。 
  • safecall :规定被 COM 调用的函数所必须遵守的规则。在编译时,safecall声明的函数被编译成与 COM 接口兼容的。
  • register :Delphi 专用的函数调用协定,直接通过寄存器传递参数,因此传递速度非常块。register 关键字也被用来注册控件。
  • varargs :标示了引用参数,它必须和 cdecl 关键字联用,表明允许调用的函数使用引用传递。

2、示例:

{ cdecl  它可以将C或C++中的数据类型转换为Delphi的. } 
{ 例如 C++ 中的代码 } 
 int X(int i) 
 { 
   return i*2; 
 } 
 
{ 如果这个函数被编译在Test.dll 中, 则用 Delphi 调用时必须使用如下方式 } 
function X(i: Integer): Integer; Cdecl; external 'Test.dll'; 
--------------------------------------------------------------------------------------
{ pascal  对所有的变量初始化,  避免因异步线程调用而产生的错误.它是向下兼容的. } 
function Test(I, J, K, L: Integer): Integer; pascal; 
begin 
  Result := I * J * K * L; 
end; 
--------------------------------------------------------------------------------------
{ stdcall 必须在主调方和被调方之间形成配对.} 
Library Test; 
//被调方:
function Fun1(I, J, K, L: Integer): Integer; stdcall; 
begin 
  Result := I * J * K * L; 
end; 
 
exports 
  Fun1; 
 
begin 
end. 
 
//主调方:
function Fun1(I, J, K, L: Integer): Integer; stdcall; external 'Test.dll'; 
//注意:使用Stdcall关键字时, 被调函数是大小写敏感的 
--------------------------------------------------------------------------------------
{ safecall 声明的函数被编译成COM接口兼容的. } 
procedure Fun1(S: WideString); safecall; 
{ 编译后: } 
procedure Fun1(S: PAnsiString); 
--------------------------------------------------------------------------------------
{ register 函数在被调用时可以在注册表内留下记录.它是向下兼容的.} 
function Fun1(I, J, K, L: Integer): Integer; register; 
begin 
  Result := I * J * K * L; 
end; 
//关键字还用于向控件库或是IDE  注册控件或是专家工具. 
procedure Register; 
begin
 RegisterComponents('Sample', [TDemo]); 
end;
--------------------------------------------------------------------------------------
{ varargs 标识了引用参数, 它必须和Cdecl关键字联用, 表明允许调用的函数使用引用传递. } 
{ 这段代码从 C++ 的类库中引用了 Printf 函数,并允许按引用的方式传入参数 } 
function printf(Format: PChar): Integer; cdecl; varargs; 

3、其他说明:  

创建时间:2021.08.12  更新时间:

相关