Forum: Software-Projekte der Mitglieder
by Uwe Raabe,
17. Nov 2018
program Project445;
{$APPTYPE CONSOLE}
{$R *.res}
uses
System.SysUtils,
System.NetEncoding,
System.Diagnostics,
Forum: Software-Projekte der Mitglieder
by Uwe Raabe,
17. Nov 2018
Kurzer Performancetest beweist übrigens das Gegenteil. Die Delphi Implementierung ist sogar noch geringfügig schneller. Dabei habe ich die notwendige TBytes -> TIdBytes Konvertierung sogar noch nicht mal berücksichtigt.
Forum: Software-Projekte der Mitglieder
by Uwe Raabe,
17. Nov 2018
System.NetEncoding.pas kann das auch mit TBytes:
function Base64_Encode(Value: TBytes): string;
begin
Result := TNetEncoding.Base64.EncodeBytesToString(Value);
end;