Forum: Programmieren allgemein
by DieDolly,
15. Jul 2019
Ja aber da kommt nur Chinesisch am Ende bei raus.
// Text: string
var
Dest: string;
L: Word;
begin
System.SetLength(Dest, Length(Text) * 3);
EncodeBase64(@Text, @Dest, Length(Text), Length(Dest), L);
Forum: Programmieren allgemein
by DieDolly,
15. Jul 2019
SetLength(Dest, Lenght(Text)*3);
Ist die Multiplikation mit 3 beabsichtigt und warum genau 3?
Den Fehler hatte ich mit SetLength auch noch nie.
Forum: Programmieren allgemein
by DieDolly,
15. Jul 2019
Ich komme mit den WE Units mal wieder nicht klar. Und ne, andere möchte ich nicht nutzen.
Wie enkodiert man einen String in Base64 mit den WE Units?
Der Funktionskopf procedure EncodeBase64(psrc,pdest: pointer; lsrc,ldest: word; var LA: word);
{-Base64 encode src to dest, LA result length of dest string}
Src habe ich. Dest scheint nur ein leerer PChar zu sein. lsrc also die Länge von...