Das geht so gar nicht, da Dein Code auf das Object vom Typ TStringStream zeigt, aber nicht auf den von den
Daten belegten Speicher
Nicht getestet, sollte aber gehen:
Delphi-Quellcode:
procedure TVerarbeitung.Decode64;
begin
FDatenstring.DataString := Base64.Base64Decode(FDatenstring.DataString);
end;
...
...