delphi调用dll函数的问题

Question

先初始化   然后设备注册    再实时显示    三个函数的说明如下   怎样调用   第一次写实在是不太会   就这么多分都给了
HI_SDK_Init
初始化，使用下面SDK接口前使用，仅在初始化SDK使用
HI_S32 HI_SDK_Init(
);
ReturnValues
HI_SUCCESS表示成功，HI_FAILURE表示失败HI_SDK_Login
用户设备注册，返回句柄供用户对设备的操作
HI_HANDLE HI_SDK_Login(
constHI_CHAR* psHost,
constHI_CHAR* psUsername,
constHI_CHAR* psPassword,
HI_U16 u16Port,
HI_S32* ps32Err
);
Parameters
psHost
[IN] 主机，可以是IP地址也可以是域名
psUsername
[IN] 用户名
psPassword
[IN] 密码
u16Port
第18页
[IN] 端口号
ps32Err
[OUT] 输出错误信息
ReturnValues
成功将返回HI_HANDLE句柄，失败返回0HI_SDK_RealPlay
实时数据
HI_S32 HI_SDK_RealPlay(
HI_HANDLE lHandle,
HI_VOID* pWnd,
HI_S_STREAM_INFO* pstruStreamInfo
);
Parameters
lHandle
[IN] 操作句柄
PWnd
[IN] 显示窗口句柄
pstruStreamInfo
[IN] 操作参数
ReturnValues
成功返回HI_SUCCESS，失败返回错误代码。

Answer 1

楼主不要急动态调用声明Dll中的函数,在Type后面或者Var后面均可。
TASTXDll = procedure(字段1,字段2,字段3……);stdcall;  //注意，动态调用声明时不要写函数名称，这里的TASTXDll可以理解为一个“类”（当然这不是类），下面会用到
var
DllName:THandle;
  Dll:TASTXDll;调用部分
DllName:=LoadLibrary('XXXX.dll');
    try
      if DllName<32 then
      begin
        MessageBox(Handle,'没有找到附带DLL文件，请确认程序是否完整！','加载DLL失败',MB_OK+MB_ICONEXCLAMATION);
        Exit;
      end;
      @Dll:=GetProcAddress(DllName,'XXXXXXX'); //XXXXXXX代表Dll中提供的函数
      if @dll <> nil then
      try 
         Dll(字段1，字段2，字段3……);
      except
        raise Exception.Create('调用失败！');
      end;
    finally
      FreeLibrary(DllName);//注意释放
    end;

Answer 2

静态调用声明DLL提供的函数
function  transfer(tran:widestring):widestring;stdcall;external 'md5.dll'{这里是DLL名称} name 'transfer'{这里是Dll里面提供的函数};调用的时候就当普通函数直接用吧。

Answer 3

具体要怎么写呢      比如
HI_SDK_Login
用户设备注册，返回句柄供用户对设备的操作
HI_HANDLE HI_SDK_Login(
constHI_CHAR* psHost,
constHI_CHAR* psUsername,
constHI_CHAR* psPassword,
HI_U16 u16Port,
HI_S32* ps32Err
);
Parameters
psHost
[IN] 主机，可以是IP地址也可以是域名
psUsername
[IN] 用户名
psPassword
[IN] 密码
u16Port
[IN] 端口号
ps32Err
[OUT] 输出错误信息
ReturnValues
成功将返回HI_HANDLE句柄，失败返回0成功了返回的这个句柄要怎么查看呢   句柄要怎么用啊   实在是看的糊涂