已知vc中的dll的头文件部分如下_declspec(dllexport) void Sina_GetUidByNickname(char* strContent,char* strUid);vc中的意思是通过你给一个 用户昵称,然后得到UID,函数是无返回值的,
我在delphi中静态引用dlltype
private
{ Private declarations }
public
{ Public declarations }
end;
function Sina_GetUidByNickname(strContent,strUid:string):integer;cdecl;external 'XXX.dll';implementation
按钮的过程中我写、var
uid;
begin
Sina_GetUidByNickname('昵称',Pchar(uid));
ShowMessage(uid);
end;
我在delphi中静态引用dlltype
private
{ Private declarations }
public
{ Public declarations }
end;
function Sina_GetUidByNickname(strContent,strUid:string):integer;cdecl;external 'XXX.dll';implementation
按钮的过程中我写、var
uid;
begin
Sina_GetUidByNickname('昵称',Pchar(uid));
ShowMessage(uid);
end;
uid:array[0..9] of Char;
p:PChar;
i:Integer;
s:string;
begin
New(p);
SinaWeiBo_OpenGetUidByNickname('叫兽教你打Dota',p);
CopyMemory(@uid[0],p,10);
for i:=0 to 9 do
begin
s := s+uid[i];
end;
Edit2.Text := s;
Dispose(p);自己摸索着解决了 SinaWeiBo_OpenLogout;
end;