Binary to Base64 (Delphi)

by

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;

More Related Contents:

  1. Delphi 2010: How to save a whole record to a file?
  2. How should I prepare my 32-bit Delphi programs for an eventual 64-bit compiler? [duplicate]
  3. Handling a Unicode String in Delphi Versions
  4. FTP Over SSH (SFTP) In delphi 2010
  5. How to split string by a multi-character delimiter?
  6. Selecting a directory with TOpenDialog
  7. TThread.resume is deprecated in Delphi-2010 what should be used in place?
  8. What is the compiler version for Delphi 2010?
  9. Delphi pre-build event not executing BEFORE compile
  10. Why are TGeneric and TGeneric incompatible types?
  11. Free Encryption library for Delphi [closed]
  12. Free Encryption library for Delphi [closed]
  13. Why should I not use “if Assigned()” before accessing objects?
  14. System Error. Code: 8. Not enough storage is available to process this command
  15. Registration-free COM/DLL?
  16. I do not understand what Application.ProcessMessages in Delphi is doing [closed]
  17. How do I let Delphi know I’ve already handled an exception?
  18. How do I translate a C union into Delphi?
  19. How do I make a PNG resource?
  20. TThreadedQueue not capable of multiple consumers?
  21. Why can Delphi DLLs use WideString without using ShareMem?
  22. How do I run a command-line program in Delphi?
  23. Should the compiler hint/warn when passing object instances directly as const interface parameters?
  24. How can I display Crystal XI reports inside a Delphi 2007 application?
  25. My program never releases the memory back. Why?
  26. Patch routine call in delphi
  27. Component Creation – Joining Components Together?
  28. Modifying or deleting a line from a text file the low-level way?
  29. XPath and TXmlDocument
  30. Delphi, How to get all local IPs?

Leave a Comment