社区
语言基础/算法/系统设计
帖子详情
关于结构体的问题,在线等待,谢谢!
tzq0572
2003-08-22 12:19:47
我在Main主框架中建立了一个机构体
UserInfo = Record
strUserName: string[20]
strUserID: string[6]
end;
var
gUserInfo: UserInfo;
我想在动态链接库中得到这个gUserInfo的值,该怎么做?请高手指点。
...全文
22
15
打赏
收藏
关于结构体的问题,在线等待,谢谢!
我在Main主框架中建立了一个机构体 UserInfo = Record strUserName: string[20] strUserID: string[6] end; var gUserInfo: UserInfo; 我想在动态链接库中得到这个gUserInfo的值,该怎么做?请高手指点。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
15 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
lxpbuaa
2003-08-22
打赏
举报
回复
dll 中:
procedure DoDoDO(PAUser: PUserInfo);stdcall;
begin
//……
end;
调用时:
var
gUserInfo: UserInfo;
begin
DoDoDO(@gUserInfo);
end;
————————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
————————————————————————————————————
tzq0572
2003-08-22
打赏
举报
回复
不是很明白,怎么把gUserInfo传给dll中的PUserInfo,能否说的详细一点,谢谢!
zjqyb
2003-08-22
打赏
举报
回复
procedure DoDoDO(var AUser:UserInfo);stdcall;
lxpbuaa
2003-08-22
打赏
举报
回复
Type
PUserInfo = ^ UserInfo;
在dll使用PUserInfo类型。
————————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
————————————————————————————————————
tzq0572
2003-08-22
打赏
举报
回复
问题已经解决,zjqyb() 50分;lxpbuaa(桂枝香在故国晚秋) 10分。谢谢大家!
我还有个问题,定义一个记录数组,也是在自动化对象中返回一个记录数组,该这个记录数组的长度?
UserInfo = record
strUserName: string[20];
strUserID: string[6];
end;
var
UserInfoArray: array of UserInfo;
tzq0572
2003-08-22
打赏
举报
回复
问题已经解决,zjqyb() 50分;lxpbuaa(桂枝香在故国晚秋) 10分。谢谢大家!
我还有个问题,定义一个记录数组,也是在自动化对象中返回一个记录数组,该这个记录数组的长度?
UserInfo = record
strUserName: string[20];
strUserID: string[6];
end;
var
UserInfoArray: array of UserInfo;
tzq0572
2003-08-22
打赏
举报
回复
好方法,但是返回值再怎么转换成gUserInfo呢?谢谢!
zjqyb
2003-08-22
打赏
举报
回复
function TDBCtl.GetUserInfo: OleVariant;
begin
Result := integer(@gUserInfo);
end;
tzq0572
2003-08-22
打赏
举报
回复
我想在自动化对象中是用一个方法,返回gUserInfo,怎么用?我用下面的方法不行,救救我!!
function TDBCtl.GetUserInfo: OleVariant;
begin
Result := gUserInfo;
end;
tzq0572
2003-08-22
打赏
举报
回复
我试过了,提示错误啊!
[Error] dllBagFrame.dpr(41): 'PUserInfo' is not a type identifier
zjqyb
2003-08-22
打赏
举报
回复
dll 中:
UserInfo = Record
strUserName: string[20]
strUserID: string[6]
end;
procedure DoDoDO(var AUser: UserInfo);stdcall;
begin
//……
end;
调用时:
var
gUserInfo: UserInfo;
begin
DoDoDO(gUserInfo);
end;
zjqyb
2003-08-22
打赏
举报
回复
在dll中再申明
Type
PUserInfo = ^ UserInfo;
tzq0572
2003-08-22
打赏
举报
回复
有人知道怎么解决吗?等待中。。。。。。
halfdream
2003-08-22
打赏
举报
回复
String的用法都错了。。。
tzq0572
2003-08-22
打赏
举报
回复
在dll中PUserIno的数据类型不认识,该怎么解决?
c语言课程设计学生成绩管理系统(1).doc
在设计的过程中遇到
问题
,可以说得是困难重重,这毕竟第一次做的,难免会遇到过各种各样的
问题
,同时 在设计的过程中发现了自己的不足之处,对以前所学过的知识理解得不够深刻,掌握得 不够牢固,比如说
结构体
……...
windbg 查看
结构体
_用WinDbg进行调试
通往WinDbg的捷径(一)windbg的...如果你问我这个
问题
,我会回答是“VisualStudio+WinDbg”。我比较喜欢VisualStudio那朴实无华且易操作的接口,更喜欢它能迅速把我需要的信息以可视的形式展示出来。但遗憾的是,Vi...
Android跨进程通信IPC之7——Binder相关
结构体
简介
结构体
就是这样的image.png如果以
结构体
为标的来看整个Binder传输过程则如下:
结构体
为标的.png。
Socket各
结构体
定义以及Socket编程函数集(非常有用)
一
结构体
详解 1.通用socket定义 struct sockaddr { unsigned short sa_family; //2 char sa_data[14]; //14 }; 上面是通用的socket地址,具体到Internet socket,用下面的结构,二者可以进行...
NEMU PA1实验思路
若想copy代码请移步他处,本文仅供学习交流用,
谢谢
! 阅读前请确保仔细阅读了PA1实验指导书的有关内容! 必做任务1 实现正确的寄存器
结构体
需要了解
结构体
和联合体的概念,保证gpr[i]对应第i个寄存器即可。 NEMU/...
语言基础/算法/系统设计
16,748
社区成员
33,247
社区内容
发帖
与我相关
我的任务
语言基础/算法/系统设计
Delphi 语言基础/算法/系统设计
复制链接
扫一扫
分享
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章