load exe to string & put in array of byte

[Agmcz]

إستعمل

كود :

function StrToByteArray(Buffer: AnsiString): TByteArray; begin    SetLength(Result,lstrlen(PChar(Buffer)));    CopyMemory(@Result[0],@Buffer[1],Length(Buffer)); end;