结构指针函数如何转换(50分)

  • 主题发起人 rainman2008
  • 开始时间
R

rainman2008

Unregistered / Unconfirmed
GUEST, unregistred user!
遇到一个dll,其中头文件包含:
struct MsgContent *get_ChangeContent(struct Msg *msg);
如何转化成pas
 
ms:^msg;
msgcon:^msgcontent;
funtion getchangecontent(m:ms):msgcon:
 
谢谢!
再请教主程序如何调用这个函数?我调用的时候出现异常错误
var
m: ^msg;
Mymsgcon: ^mscontent;
new(Mymsgcon);
Mymsgcon.a := getchangecontent(m).a;
Mymsgcon.b := getchangecontent(m).b;
..
dispose(Mymsgcon);
 
var s: Msg;
mm: MsgContent;
begin
mm := GetChangeContent(@s)^;
ShowMessage(IntToStr(mm.a)+','+IntToStr(mm.b));
end;
 
接受答案了
 

Similar threads

S
回复
0
查看
949
SUNSTONE的Delphi笔记
S
S
回复
0
查看
770
SUNSTONE的Delphi笔记
S
顶部