易语言调试增强插件开源

map ＝ CreateFileMappingA (hFile, 0, 2, 0, 0, “”) ' 映射文件
.如果真 (map ＝ 0)
返回 (“?未知模块?”)
.如果真结束
r ＝ MapViewOfFile (map, 4, 0, 0, 0)
.如果真 (r ＝ 0)
返回 (“?未知模块?”)
.如果真结束
name ＝ 取空白文本 (256)
GetMappedFileName (-1, r, name, 256)
CloseHandle (map) ' 关闭内核对象
返回 (name)