tangfuyou 2021-09-15 11:38 采纳率: 0%
浏览 31
已结题

DELPHI调用DLL 怎么接收参数是引用?

function VerifyPublicKey(RandomM:PChar;DataOut:PChar):integer;stdcall;External'AA.dll';

procedure TForm1.Button1Click(Sender: TObject);
var Flag:integer;
RStr:STRING;
DStr:STRING;
begin
DStr:='9999999';//
Flag:=VerifyPublicKey(RStr,DStr);
if Flag=1 then
begin
Application.MessageBox('OK!','系统提示',mb_ok);
Memo1.Lines.Add(DStr^);//显示返回的内容
end
else
begin
Application.MessageBox('失败!','系统提示',mb_ok);
end;
end;

  • 写回答

1条回答 默认 最新

报告相同问题?

问题事件

  • 已结题 (查看结题原因) 10月6日
  • 修改了问题 9月16日
  • 创建了问题 9月15日