|
本帖最后由 琪诺兔 于 2021-12-16 16:16 编辑
诶,能选开源大赛诶,好耶那我也发一个玩(
|
取执行文件名W | 字节集 | | |
缓冲长度 | 整数型 | | | | 取回类型 | 短整数型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | 缓冲大小 | | | | 缓冲区 | | | | 缓冲区长度 | | | | 返回值 | | | | 文件名扩展名 | | | | 文件名扩展名长度 | | | | 扩展名 | | | | 扩展名长度 | | | | 文件名 | | | | 文件名长度 | | | | 四等缓冲 | 字节集 | | |
缓冲大小 = 选择 (是否为空 (缓冲长度 ), 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 (缓冲区)返回 ({ })
|
评分
-
参与人数 4 | 好评 +4 |
精币 +10 |
收起
理由
|
烽火云天
| + 1 |
|
支持开源~!感谢分享 |
易语言资源网
| + 1 |
+ 5 |
支持开源~!感谢分享 |
金胖子
| + 1 |
+ 2 |
支持开源~!感谢分享 |
冰点
| + 1 |
+ 3 |
支持开源~!感谢分享 |
查看全部评分
|