Einzelnen Beitrag anzeigen

DieDolly

Registriert seit: 22. Jun 2018
2.175 Beiträge
 
#5

AW: Wie benutzt man Wolfgang Erhardts Base64 Unit?

  Alt 15. Jul 2019, 18:15
Ja aber da kommt nur Chinesisch am Ende bei raus.
Delphi-Quellcode:
// Text: string
var
 Dest: string;
 L: Word;
begin
 System.SetLength(Dest, Length(Text) * 3);
 EncodeBase64(@Text[1], @Dest[1], Length(Text), Length(Dest), L);

 Result := Dest;
end;
Aus ABD sollte eigentlich QUJD werden.
  Mit Zitat antworten Zitat