pb调用delphi写的dll,其中有一个参数是数组,但pb提示错误:

charge 2003-05-25 04:59:22
pb调用delphi写的dll,其中有一个参数是数组,但pb提示错误:
bad runtime function reference
其中pb的调用方式是:li_Rtn = FSendEmail(1, StrArgs)
pb中的声明:
FUNCTION int fsendemail(int v1, ref string v2[]) Library "E:\MyProgram\dll\PSdEmail_dll.dll"
---------
delphi的代码是:
library PSdEmail_dll;
uses
SysUtils,
Classes,
Dialogs,
UEmail in 'UEmail.pas';

{$R *.res}
function FSendEmail(const v1: integer; v2: array of string):integer;StdCall;
var
iLowIndex, iHighIndex: Integer;
i: Integer;
StrAry: array of string;
begin
SetLength(StrAry, 10);
iLowIndex := Low(v2);
iHighIndex := High(v2);
For i := iLowIndex to iHighIndex do
begin
ShowMessage(v2[i] + '-The index is ' + IntToStr(i));
end;
Result := v1;
end;
exports
FSendEmail;
end.
...全文
128 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
cctvnet 2003-05-25
  • 打赏
  • 举报
回复
同样关注
ljccyzy 2003-05-25
  • 打赏
  • 举报
回复
关注,我也遇到了同样的问题。

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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