zoukankan      html  css  js  c++  java
  • 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  更新时间:

    博客园 滔Roy https://www.cnblogs.com/guorongtao 希望内容对你所有帮助,谢谢!
  • 相关阅读:
    HDU 5302(Connect the Graph- 构造)
    Redis 集群
    HDFS集中式缓存管理(Centralized Cache Management)
    JavaScript语言基础12
    【IOS】启动画面
    小贝_mysql优化学习
    hdu2099 整除的位数(暴力)
    Receiver type ‘X’ for instance message is a forward declaration
    动态游标(比如表名作为參数)以及动态SQL分析
    mongodb与SQL相应关系表
  • 原文地址:https://www.cnblogs.com/guorongtao/p/15131518.html
Copyright © 2011-2022 走看看