delphi的调用约定

Calling conventions(调用约定)


   在声明过程或函数时,你可以使用下面的指示字之一来指明调用约定:register、pascal、cdecl、stdcall以及safecall。比如,

function MyFunction(X, Y: Real): Real; cdecl;
...
      调用约定决定了参数被传递给例程的顺序,它们也影响从堆栈中删除参数、传递参数时寄存器的使用,以及错误和异常处理。默认的调用约定是register。

• register 和pascal 调用从左到右传递参数,也就是说,最左边的参数最早被计算并传递,最右边的参数最后被计算和传递;cdecl、stdcall 和safecall 调用从右到左传递参数;
• 除了cdecl 调用,过程和函数在返回之前从堆栈中移除参数,而使用cdecl,当调用返回时,调用者从堆栈中移除参数;
• register 调用能使用多达3 个CPU 寄存器传递参数,而其它调用则全部使用堆栈传递参数;
• safecall 调用实现了异常“防火墙”,在Windows 下,它实现了进程间COM 错误通知。
下面的表格对调用约定进行了总结:

--------------------------------------------------------------------------------------------------
-指示字-------------- 参数顺序--------- Clean-up ---------------使用寄存器传递参数?|
-register--------------- Left-to-right ---------Routine -----------------Yes---------------------||
-pascal ---------------  Left-to-right ---------Routine -----------------No----------------------|
-cdecl----------------- Right-to-left ---------Caller --------------------No---------------------|
-stdcall ----------------Right-to-left ----------Routine --------------------No------------------|
-safecall--------------- Right-to-left ----------Routine --------------------No------------------|
-------------------------------------------------------------------------------------------------
        默认的register 调用是最有效的,因为它通常避免了要创建堆栈结构(stack frame)(访问公布属性的方法必须使用register);当调用来自C/C++编写的共享库中的函数时,cdecl 是有用的;通常,当调用外部代码时,推荐使用stdcall 和safecall。在Windows 中,系统API 使用stdcall 和safecall,其它操作系统通常使用cdecl(注意,stdcall 比cdecl 更有效)。
        声明双重接口的方法必须使用safecall;保留pascal 调用是为了向后兼容性。要了解更多的调用约定的信息,请参考Program control。
        指示字near、far 和export 用在16 位Windows 编程中,它们对32 位程序没有影响,保留它们是为了向后兼容性。

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
Delphi调用 NationECCode.dll,你可以按照以下步骤进行操作: 1. 将 NationECCode.dll 文件放置在你的 Delphi 项目的合适位置。 2. 打开 Delphi IDE,创建一个新的 Delphi 程序。 3. 在程序中导入 NationECCode.dll 的函数声明。这可以通过在程序中添加以下代码来完成: ```delphi type TECCodeFunction = function(param1: Integer; param2: PChar): Integer; stdcall; var ECCodeFunction: TECCodeFunction; hDll: THandle; procedure LoadDLL; begin hDll := LoadLibrary('NationECCode.dll'); if hDll <> 0 then begin @ECCodeFunction := GetProcAddress(hDll, 'ECCodeFunction'); if Assigned(ECCodeFunction) then ShowMessage('DLL loaded successfully.') else ShowMessage('Failed to load DLL function.'); end else ShowMessage('Failed to load DLL.'); end; procedure UnloadDLL; begin if hDll <> 0 then FreeLibrary(hDll); end; ``` 4. 在需要调用 NationECCode.dll 的地方调用 ECCodeFunction 函数。例如: ```delphi var result: Integer; begin LoadDLL; result := ECCodeFunction(123, 'test'); UnloadDLL; end; ``` 这是一个简单的示例,你需要根据实际情况修改参数类型和函数名。确保 NationECCode.dll 和 Delphi 程序的位数(32 位或 64 位)匹配。 请注意,此示例假设 NationECCode.dll 是使用标准的 stdcall 调用约定编译的。如果使用其他调用约定(如 cdecl),请相应地修改代码中的函数声明和加载过程。 希望这可以帮助到你!如果还有其他问题,请随时提问。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值