开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

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


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

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

查看: 5042|回复: 24
打印 上一主题 下一主题
收起左侧

[2021开源大赛(第六届)] 纯API+内存取执行文件名W,A版请自己改造应该挺简单的吧

[复制链接]
跳转到指定楼层
楼主
发表于 2021-12-16 16:11:12 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式   辽宁省鞍山市
本帖最后由 琪诺兔 于 2021-12-16 16:16 编辑

诶,能选开源大赛诶,好耶那我也发一个玩(

  
子程序名返回值类型公开备 注
取执行文件名W字节集 取当前被执行的易程序文件名。
参数名类 型参考可空数组备 注
缓冲长度整数型默认512
取回类型短整数型默认只返回纯文件名,1=返回全路径文件名,2带有扩展名的文件名,3只返回扩展名,其他统一返回纯文件名
变量名类 型静态数组备 注
缓冲大小  
缓冲区  
缓冲区长度  
返回值  
文件名扩展名  
文件名扩展名长度  
扩展名  
扩展名长度  
文件名  
文件名长度  
四等缓冲字节集 
缓冲大小 = 选择 (是否为空 (缓冲长度), 512, 缓冲长度)
缓冲区 = LocalAlloc ( #LMEM_ZEROINIT, 缓冲大小)
返回值 = GetModuleFileNameExW (GetCurrentProcess (), GetModuleHandleW (0), 缓冲区,  缓冲大小 ÷ 2)
如果真 (返回值 > 0)
判断 (取回类型 = 1)
缓冲区长度 = lstrlenW (缓冲区) × 2 + 2
四等缓冲 = 指针到字节集 (缓冲区, 缓冲区长度)
判断 (取回类型 = 2)
文件名扩展名 = PathFindFileNameW (缓冲区)
文件名扩展名长度 = lstrlenW (文件名扩展名) × 2 + 2
四等缓冲 = 指针到字节集 (文件名扩展名, 文件名扩展名长度)
判断 (取回类型 = 3)
文件名扩展名 = PathFindFileNameW (缓冲区)
扩展名 = PathFindExtensionW (文件名扩展名)
扩展名长度 = lstrlenW (扩展名) × 2 + 2
四等缓冲 = 指针到字节集 (扩展名, 扩展名长度)
判断 (取回类型 = 4)
文件名扩展名 = PathFindFileNameW (缓冲区)
文件名扩展名长度 = lstrlenW (文件名扩展名) × 2
扩展名 = PathFindExtensionW (文件名扩展名)
扩展名长度 = lstrlenW (扩展名) × 2
文件名 = LocalAlloc ( #LMEM_ZEROINIT, 缓冲大小)
文件名长度 = 文件名扩展名长度 - 扩展名长度
RtlMoveMemory (文件名, 文件名扩展名, 文件名长度)
四等缓冲 = 指针到字节集 (文件名, 文件名长度 + 2)
LocalFree (文件名)
文件名扩展名 = PathFindFileNameW (缓冲区)
文件名扩展名长度 = lstrlenW (文件名扩展名) × 2
扩展名 = PathFindExtensionW (文件名扩展名)
扩展名长度 = lstrlenW (扩展名) × 2
文件名 = LocalAlloc ( #LMEM_ZEROINIT, 缓冲大小)
文件名长度 = 文件名扩展名长度 - 扩展名长度
RtlMoveMemory (文件名, 文件名扩展名, 文件名长度)
四等缓冲 = 指针到字节集 (文件名, 文件名长度 + 2)
LocalFree (文件名)
LocalFree (缓冲区)
返回 (四等缓冲)
LocalFree (缓冲区)
返回 ({  })
  
DLL命令名返回值类型公开备 注
GetModuleFileNameExW整数型 
DLL库文件名:
Psapi.dll
在DLL库中对应命令名:
GetModuleFileNameExW
参数名类 型传址数组备 注
hProcess整数型
hModule整数型
lpFilename整数型
nSize整数型
DLL命令名返回值类型公开备 注
GetCurrentProcess整数型 
DLL库文件名:
kernel32
在DLL库中对应命令名:
GetCurrentProcess
参数名类 型传址数组备 注
DLL命令名返回值类型公开备 注
GetModuleHandleW整数型 获取一个应用程序或动态链接库的模块句柄。如执行成功成功,则返回模块句柄。零表示失败。
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
GetModuleHandleW
参数名类 型传址数组备 注
lpModuleName整数型指定模块名,这通常是与模块的文件名相同的一个名字。例如,NOTEPAD.EXE程序的模块文件名就叫作NOTEPAD只有在当前进程的场景中,这个句柄才会有效
DLL命令名返回值类型公开备 注
PathFindFileNameW整数型 文件路径取文件名
DLL库文件名:
shlwapi.dll
在DLL库中对应命令名:
PathFindFileNameW
参数名类 型传址数组备 注
pszPath整数型要取文件名的文件路径
DLL命令名返回值类型公开备 注
PathFindExtensionW整数型 获取绝对路径或文件名中的文件扩展名。如果扩展名找到则返回pszPath字符串中“.”所在地址,否则返回空字符结尾地址。
DLL库文件名:
shlwapi.dll
在DLL库中对应命令名:
PathFindExtensionW
参数名类 型传址数组备 注
pszPath整数型指向以0结尾,最大长度为MAX_PATH文件路径字符串指针。备注:一个有效的扩展名是不包括空格的。
DLL命令名返回值类型公开备 注
lstrlenW整数型 
DLL库文件名:
kernel32
在DLL库中对应命令名:
lstrlenW
参数名类 型传址数组备 注
lpString整数型0
DLL命令名返回值类型公开备 注
LocalAlloc整数型 申请内存.这个函数从堆中分配指定大小的字节数。
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
LocalAlloc
参数名类 型传址数组备 注
uFlags整数型LMEM_,定如何分配内存。如果指定零,则默认值为LMEM_FIXED标志。
uBytes整数型指定要分配的字节数。
DLL命令名返回值类型公开备 注
LocalFree整数型 Windows API释放局部内存对象并使句柄失效
DLL库文件名:
kernel32
在DLL库中对应命令名:
LocalFree
参数名类 型传址数组备 注
hMem整数型局部内存对象的句柄,通过函数LocalAlloc或LocalReAlloc返回的。
DLL命令名返回值类型公开备 注
RtlMoveMemory整数型 拷贝来源内存到目标内存。无返回值。
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
RtlMoveMemory
参数名类 型传址数组备 注
lpDestination整数型指向目标内存的指针
lpSource整数型指向来源内存的指针
Length整数型拷贝的字节数。




IGQP0_6LY9MKBA9`EZ)GZTU.png (283.25 KB, 下载次数: 3)

IGQP0_6LY9MKBA9`EZ)GZTU.png

评分

参与人数 4好评 +4 精币 +10 收起 理由
烽火云天 + 1 支持开源~!感谢分享
易语言资源网 + 1 + 5 支持开源~!感谢分享
金胖子 + 1 + 2 支持开源~!感谢分享
冰点 + 1 + 3 支持开源~!感谢分享

查看全部评分

本帖被以下淘专辑推荐:

结帖率:67% (2/3)

签到天数: 1 天

沙发
发表于 2021-12-16 16:46:00 | 只看该作者   四川省成都市
感谢分享
回复 支持 反对

使用道具 举报

结帖率:100% (7/7)

签到天数: 10 天

板凳
发表于 2021-12-16 17:08:40 | 只看该作者   湖北省武汉市
谢谢分享
回复 支持 反对

使用道具 举报

结帖率:0% (0/1)
地板
发表于 2021-12-16 18:43:30 | 只看该作者   山西省太原市
是兔娘!
回复 支持 反对

使用道具 举报

签到天数: 6 天

地下
发表于 2021-12-16 19:34:52 | 只看该作者   广东省东莞市
谢谢分享
回复 支持 反对

使用道具 举报

结帖率:90% (9/10)

签到天数: 5 天

6
发表于 2021-12-16 21:10:05 | 只看该作者   广东省广州市
收藏了。感谢分享
回复 支持 反对

使用道具 举报

结帖率:86% (6/7)

签到天数: 10 天

7
发表于 2021-12-16 21:25:06 | 只看该作者   新疆维吾尔自治区昌吉回族自治州
谢谢分享!
回复 支持 反对

使用道具 举报

结帖率:83% (10/12)
8
发表于 2021-12-16 22:40:28 | 只看该作者   山东省枣庄市
拿来吧你!
回复 支持 反对

使用道具 举报

结帖率:100% (19/19)

签到天数: 10 天

9
发表于 2021-12-17 07:55:20 | 只看该作者   辽宁省大连市
支持开源~!感谢分享
回复 支持 反对

使用道具 举报

结帖率:100% (3/3)

签到天数: 7 天

10
发表于 2021-12-17 10:34:23 | 只看该作者   广东省深圳市
支持开源~!感谢分享~
回复 支持 反对

使用道具 举报

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

本版积分规则 致发广告者

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

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

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