How can I get content of an exe
file and convert it into Base64
encoding ?
Edit
I use D2010
and I want to know how is it possible exactly ?
open an exe file
convert its content into base64
In Delphi 2009/2010/XE there is unit EncdDecd.pas
(Soap.EncdDecd.pas
for Delphi XE2) containing the functions EncodeBase64
and DecodeBase64
. You can load the exe file into a memorystream and then call EncodeBase64.
function EncodeFile(const FileName: string): AnsiString;
var
stream: TMemoryStream;
begin
stream := TMemoryStream.Create;
try
stream.LoadFromFile(Filename);
result := EncodeBase64(stream.Memory, stream.Size);
finally
stream.Free;
end;
end;