关于PE文件的进制编码 ( 积分: 49 )

关于PE文件的进制编码

Buf256_0:TBuf=(
$4D,$5A,$50,$00,$02,$00,$00,$00,
$04,$00,$0F,$00,$FF,$FF,$00,$00,
$B8,$00,$00,$00,$00,$00,$00,$00,
$40,$00,$1A,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$01,$00,$00,
$BA,$10,$00,$0E,$1F,$B4,$09,$CD,
$21,$B8,$01,$4C,$CD,$21,$90,$90,
$54,$68,$69,$73,$20,$70,$72,$6F,
$67,$72,$61,$6D,$20,$6D,$75,$73,
$74,$20,$62,$65,$20,$72,$75,$6E,
$20,$75,$6E,$64,$65,$72,$20,$57,
$69,$6E,$33,$32,$0D,$0A,$24,$37,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00
);

Buf256_1:TBuf=(
$50,$45,$00,$00,$4C,$01,$07,$00,
$19,$5E,$42,$2A,$00,$00,$00,$00,
$00,$00,$00,$00,$E0,$00,$8E,$81,
$0B,$01,$02,$19,$00,$36,$00,$00,
$00,$1C,$00,$00,$00,$00,$00,$00,
$3C,$42,$00,$00,$00,$10,$00,$00,
$00,$50,$00,$00,$00,$00,$00,$10,
$00,$10,$00,$00,$00,$02,$00,$00,
$04,$00,$00,$00,$00,$00,$00,$00,
$04,$00,$00,$00,$00,$00,$00,$00,
$00,$D0,$00,$00,$00,$04,$00,$00,
$00,$00,$00,$00,$02,$00,$00,$00,
$00,$00,$10,$00,$00,$40,$00,$00,
$00,$00,$10,$00,$00,$10,$00,$00,
$00,$00,$00,$00,$10,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$90,$00,$00,$98,$03,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$C0,$00,$00,$E8,$03,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$B0,$00,$00,$18,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$00,$00,$00,$00,$00,$00,$00,$00,
$43,$4F,$44,$45,$00,$00,$00,$00
);

...后面还有一堆,略过...

procedure DNASTUB(const StrSaveFileName:String);
var
hFile:THandle;
begin
try
//建立读文件句柄
hFile := CreateFile(Pchar(StrSaveFileName),
GENERIC_READ or GENERIC_WRITE,
FILE_SHARE_READ,
nil,
CREATE_ALWAYS,
0,
0)

if hFile = INVALID_HANDLE_VALUE then Exit;
FileWrite(hFile,Buf256_0,256);
FileWrite(hFile,Buf256_1,256);
...后面还有一堆,略过...
CloseHandle(hFile);
except
end;
end;
end.

上面是牛人的东西,现在我忧郁,用UE打开文件可以看到那些进制编码,不过由于太多,频繁操作很烦恼...
有什么方法或者工具可以直接转换的吗?

看不懂你想做什么