PE文件详细信息查看软件

易语言 2020-07-24 16:18:54

PE文件详细信息查看软件

载入 (窗口_区段查看器, _启动窗口, 假)
超级列表框_区段列表.全部删除 ()
.计次循环首 (取数组成员数 (IMAGE_SECTION_HEADER), i)
区段索引 = 超级列表框_区段列表.插入表项 (, 到文本 (IMAGE_SECTION_HEADER [i].Name), , , , )
超级列表框_区段列表.置标题 (区段索引, 1, 格式化文本 (“%.8X”, IMAGE_SECTION_HEADER [i].VirtualAddress))
超级列表框_区段列表.置标题 (区段索引, 2, 格式化文本 (“%.8X”, IMAGE_SECTION_HEADER [i].VirtualSize))
超级列表框_区段列表.置标题 (区段索引, 3, 格式化文本 (“%.8X”, IMAGE_SECTION_HEADER [i].PointerToRawData))
超级列表框_区段列表.置标题 (区段索引, 4, 格式化文本 (“%.8X”, IMAGE_SECTION_HEADER [i].SizeOfRawData))
超级列表框_区段列表.置标题 (区段索引, 5, 格式化文本 (“%.8X”, IMAGE_SECTION_HEADER [i].Characteristics))
.计次循环尾 ()

.计次循环首 (IMAGE_NT_HEADERS32.FileHeader.NumberOfSections, j)
.如果真 (IMAGE_NT_HEADERS32.OptionalHeader.AddressOfEntryPoint ≥ IMAGE_SECTION_HEADER [j].VirtualAddress 且 IMAGE_NT_HEADERS32.OptionalHeader.AddressOfEntryPoint ≤ IMAGE_SECTION_HEADER [j].VirtualAddress + IMAGE_SECTION_HEADER [j].VirtualSize)
编辑框_入口点.内容 = 格式化文本 (“%.8X”, IMAGE_NT_HEADERS32.OptionalHeader.AddressOfEntryPoint)
编辑框_偏移.内容 = 格式化文本 (“%.8X”, 到整数 (IMAGE_NT_HEADERS32.OptionalHeader.AddressOfEntryPoint - (IMAGE_SECTION_HEADER [j].VirtualAddress - IMAGE_SECTION_HEADER [j].PointerToRawData)))
编辑框_链接器.内容 = 格式化文本 (“%d.%d”, IMAGE_NT_HEADERS32.OptionalHeader.MajorLinkerVersion, IMAGE_NT_HEADERS32.OptionalHeader.MinorLinkerVersion)
编辑框_EP.内容 = 到文本 (IMAGE_SECTION_HEADER [j].Name)
移动读写位置 (文件号, #文件首, IMAGE_NT_HEADERS32.OptionalHeader.AddressOfEntryPoint - (IMAGE_SECTION_HEADER [j].VirtualAddress - IMAGE_SECTION_HEADER [j].PointerToRawData))
tmp = 读入字节集 (文件号, 4)
.如果真 (取字节集长度 (tmp) = 4)
编辑框_首字节.内容 = 格式化文本 (“%.2X,%.2X,%.2X,%.2X”, tmp [1], tmp [2], tmp [3], tmp [4])
.如果真结束
编辑框_子系统.内容 = 格式化文本 (“%.4X”, IMAGE_NT_HEADERS32.OptionalHeader.Subsystem)