bluekitty(不若人生一场醉)进,刚结贴给错分了,进来回贴给分

lt8024 2010-11-04 05:30:34
bluekitty(不若人生一场醉)进,刚结贴给错分了,不好意思,快进来回贴好给分

帖子: delphi如何调用VC写的dll动态库
你回的这段代码我参考了,有用
var
APCharArray:array[0..10]of PChar;
i:integer;
begin
for i:=0 to 10 do
GetMem(APCharArray[i],xxx);//这里你自己分配xxx大小
try

OnLink_Net(整数,整数,整数,APCharArray);//调用函数

.....//其他操作
finally
for i:=0 to 10 do
FreeMem(APCharArray[i]);
end;
end;
...全文
50 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
  • 打赏
  • 举报
回复
低调接分,能干活了是第一要务,那个贴我又看了,最后你说的那个函数int WINAPI OnReadL_Net(short int *addata[ ],long len)在delphi这样调用就可以了

//声明
function OnReadL_Net(ADDATA:Array of PInteger;Len:Integer):Integer;stdcall;external 'dll名';

//使用
var
APIntegerArray:array[0..10]of PIngeter;
i:integer;
begin
for i:=0 to 10 do
GetMem(APIntegerArray[i],SizeOf(Integer));//直接分配4字节也可以,因为integer固定4字节
try

OnReadL_Net(APIntegerArray,整数);//调用函数

.....//其他操作
finally
for i:=0 to 10 do
FreeMem(APIntegerArray[i]);
end;

喝口水 2010-11-04
  • 打赏
  • 举报
回复
bluekitty的头彩

16,748

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧