-
-
[求助]类型转换遇到的问题
-
发表于:
2007-10-11 21:04
3860
-
Program PE;
{$APPTYPE CONSOLE}
uses
Windows, SysUtils;
var
F, Dsig, PeOff : integer ;
i, nSection : WORD ;
PSig : Dword ;
Buf : array[0..1024] of BYTE;
PDos_Header : PImageDOSHeader;
PFile_Header : PImageFileHeader;
begin
F := FileOpen('Hello.exe', fmOpenRead);
FileSeek(F, 0, 0);
FileRead(F, Buf, 1024);
PDos_Header := @Buf;
PFile_Header := ( @Buf + sizeof(TImageDOSHeader) + 4 );
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
代码在这行编译通不过,请帮忙修改
[招生]科锐逆向工程师培训(2024年11月15日实地,远程教学同时开班, 第51期)