Is Valid IMAGE_DOS_SIGNATURE
Posted
by iira
on Stack Overflow
See other posts from Stack Overflow
or by iira
Published on 2010-04-21T04:10:36Z
Indexed on
2010/04/21
4:13 UTC
Read the original article
Hit count: 327
delphi
|header-files
I want to check a file has a valid IMAGE_DOS_SIGNATURE (MZ)
function isMZ(FileName : String) : boolean;
var
Signature: Word;
fexe: TFileStream;
begin
result:=false;
try
fexe := TFileStream.Create(FileName, fmOpenRead or fmShareDenyNone);
fexe.ReadBuffer(Signature, SizeOf(Signature));
if Signature = $5A4D { 'MZ' } then
result:=true;
finally
fexe.free;
end;
end;
I know I can use some code in Windows unit to check the IMAGE_DOS_SIGNATURE. The problem is I want the fastest way to check IMAGE_DOS_SIGNATURE (for a big file). I need your some suggestion about my code or maybe a new code?
Thanks
© Stack Overflow or respective owner