开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 5464|回复: 99
收起左侧

[易源码分享] 新年好 易语言 sizeof 函数实现

[复制链接]

结帖率:100% (53/53)
发表于 2023-12-30 21:28:21 | 显示全部楼层 |阅读模式   福建省宁德市
分享源码
界面截图:
是否带模块: 纯源码
备注说明: -
本帖最后由 帅气与大侠 于 2024-1-1 01:04 编辑

年末了,今年又学习到了不少新知识, 跟大家分享下易语言 sizeof 实现方法。

日常开发中,经常要调用某些 api 函数,拷贝来拷贝去,其中不免会遇到要填写某个数据类型的结构尺寸
看 api 文档别的语言是通过 sizeof(var) 去统计某些结构体的尺寸,但是咱易语言没有。


最早我是拿手指头一个一个数的,经常手指头不够用。
后来学到了用 LocalSize () 函数,将参数类型改为具体的数据类型去计算
每次遇到新数据类型结构就要新定义一个DLL,也很麻烦!
刚好近期消化了不少关于内存的知识,就尝试下看看,调试观察了各种各样的数据类型,大致是了解清楚了存储机制,把 sizeif 的功能搞出来了。
不过有点小瑕疵,就是参数无法弄成通用型的,要额外:取指针地址(变量)传入。
强制取通用型测试会异常,有大佬会弄的可以试试弄成通用型变量。

完整源码下载: sizeof.zip (384.42 KB, 下载次数: 67)

点评

也不看看最初易语言的面对用户是谁?吴涛一开始并没有想要给专业程序员再开发一个编程语言,而是要给不会英语不会编程的普通人一个入门的机会   辽宁省大连市  发表于 2023-12-31 10:32
易语言鸡肋就鸡肋于阉割太多东西了,导致需要另类造轮。   广东省汕头市  发表于 2023-12-31 01:55

评分

参与人数 25好评 +4 精币 +30 收起 理由
聿聿 + 1 感谢分享,很给力!~
Mainli + 1 感谢分享,很给力!~
keyi5566 + 1 感谢分享,很给力!~
3266167 + 1 感谢分享,很给力!~
猪滴寳貝哝 + 1 + 2 感谢分享,很给力!~
qweipuq + 1 感谢分享,很给力!~
qq40962060 + 1 + 2 支持开源~!感谢分享
wa690602724 + 1 感谢分享,很给力!~
mypursue + 1 感谢分享,很给力!~
无尘666 + 1 感谢分享,很给力!~
pj小黑屋 + 1 感谢分享,很给力!~
t176 + 1 感谢分享,很给力!~
望尘莫及 + 1 感谢分享,很给力!~
1828902364 + 1 感谢分享,很给力!~
风雨3137 + 1 感谢分享,很给力!~
※逍遥游※ + 1 感谢分享,很给力!~
qiyuer + 1 感谢分享,很给力!~
Zźh926 + 1 感谢分享,很给力!~
ican8 + 1 感谢分享,很给力!~
XXGL2005 + 1 感谢分享,很给力!~
YzZA + 1 感谢分享,很给力!~
易语言资源网 + 1 + 3 开源精神必须支持~
kyo9766 + 1 感谢分享,很给力!~
財財 + 1 感谢分享,很给力!~
天空飞翔 + 1 + 2 感谢分享,很给力!~

查看全部评分


本帖被以下淘专辑推荐:

结帖率:100% (53/53)
 楼主| 发表于 2024-1-16 16:21:32 | 显示全部楼层   福建省宁德市

提示:找不到通用型变量 需要到精易模块源码里找取指针_通用型(),复制下里面的通用型就可以了
  
子程序名返回值类型公开备 注
sizeof整数型 取数据结构的尺寸大小
参数名类 型参考可空数组备 注
变量通用型数据结构变量,不能是数组,且数据结构未赋值
变量名类 型静态数组备 注
pAddr整数型 
I整数型 
char字节型 
count整数型 
len整数型 
ptr整数型 
size整数型 
pAddr = __get (取指针_通用型 (变量), 0)
如果真 (pAddr > 0 pAddr < 10)
返回 (取数据类型尺寸 (pAddr))

循环判断首 ()
char = __get_byte (pAddr, I)
判断 (char = 171)
count = count + 1
count = 0

I = I + 1
循环判断尾 (count < 7)
len = I - count + 1
变量循环首 (0, len, 4, I)
ptr = __get (pAddr, I)
判断 (指针_是否有效 (ptr))
如果真 (__get (ptr, 0) = 1)  ' 如果开头是{1,0,0,0},可能是数组
ptr = ptr + 8

size = size + sizeof (ptr)
size = size + 4

变量循环尾 ()
如果真 (size ≠ 0)
size = size - 4
返回 (size)

回复 支持 反对

使用道具 举报

发表于 昨天 02:14 | 显示全部楼层   广西壮族自治区南宁市
66666666666666666666666666666666
回复 支持 反对

使用道具 举报

结帖率:100% (4/4)

签到天数: 1 天

发表于 3 天前 | 显示全部楼层   山东省淄博市
感谢分享
回复 支持 反对

使用道具 举报

发表于 5 天前 | 显示全部楼层   河南省驻马店市

支持支持支持支持支持支持支持
回复 支持 反对

使用道具 举报

发表于 5 天前 | 显示全部楼层   江苏省宿迁市
6666666666666666666666
回复 支持 反对

使用道具 举报

发表于 6 天前 | 显示全部楼层   辽宁省沈阳市
学到了
回复 支持 反对

使用道具 举报

结帖率:33% (2/6)
发表于 6 天前 | 显示全部楼层   广东省湛江市
支持开源~!感谢分享
回复 支持 反对

使用道具 举报

结帖率:0% (0/3)

签到天数: 1 天

发表于 2024-2-20 07:48:33 | 显示全部楼层   辽宁省大连市
感谢分享,很给力!~
回复 支持 反对

使用道具 举报

发表于 2024-2-19 01:43:11 | 显示全部楼层   重庆市重庆市
11111111111111111111111111111111111
回复 支持 反对

使用道具 举报

发表于 2024-2-19 01:34:37 | 显示全部楼层   湖北省黄冈市
学习了,感谢分享。
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 诚聘英才| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 800073686,邮箱:800073686@b.qq.com
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表