Delphi调用DLL

原创

于 2018-09-07 16:12:08 发布 · 4.8k 阅读

4 ·

CC 4.0 BY-SA版权

本文将详细介绍如何在Delphi中调用DLL文件，包括函数声明的步骤和运行时加载DLL的方法，帮助开发者更好地理解和实践这一技术。

1、函数声明

var
  FormMain: TFormMain;
  hDllq: THandle = 0;                                      //dll句柄

  {=====  采集 DLL 开始   ======================================================================}

  initAll: procedure(); stdcall;

  {-------------------------------------------------------
    过程名：openDevice
    功  能：创建设备实例
    参  数：
            IP，一个采集设备对应一个IP。设置的ip地址指针,指向一个点分十进制表示的IP的字符串，
            如 char IP [] = "192.168.23.12";
    返回值：
            -1 表示与设备通讯失败；
            -2 表示设备IP已存在；
            -3 表示输入的IP地址不合法；
            >0 的值表示创建成功，其具体值为在其他函数中需要用到的devID；
  --------------------------------------------------------}
  openDevice: function(IP: PAnsiChar; retryTime: Integer): Integer; stdcall;

  {-------------------------------------------------------
    过程名：setSampleFrequency
    功  能：设置采样频率(单卡)
    参  数：
            devID,设备号，通过createDevice函数获得；
            cardIndex，表示设置的卡在设备上的序列号，从1开始；
            fs为采样频率，需为2048的整数

最低0.47元/天解锁文章