Anlässlich meines Updates von Delphi auf Sydney habe ich auch Turbopower Lockbox auf die neuste Version 3.7 (mittels GetIt
Package Manager) umgestellt. Nun stehe ich vor dem Problem, dass sich diverse Funktionen in Lockbox geändert haben und deshalb ein älteres Projekt sich nicht mehr kompilieren lässt. Die meisten Probleme konnte ich lösen, doch bei Stream_to_Base64 komme ich nicht mehr weiter.
Deklaration von Stream_to_Base64 in meiner bisher verwendeten Lockbox Version:
function Stream_to_Base64(Source: TStream; const Transform: string = ''): string;
Deklaration in aktuellster Lockbox Version:
function Stream_to_Base64(ASource: TStream; const ATransform: TBytes = nil): TBytes;
Wie stelle ich meinen bisherigen Code um?
Delphi-Quellcode:
{StrStream: TStringStream;
base64String: String;
enc: TMemorystream;}
StrStream.LoadFromFile(FileToDecrypt);
StrStream.Position := 0;
base64String := StrStream.DataString;
Base64_to_stream(base64String, enc);
Die von mir gefundenen Beispiele im Web basieren alle noch auf der alten Deklaration der Funktion Stream_to_Base64