Another way to stay closer to your original code is using TNetEncoding.Base64String:

...
uses
System.NetEncoding;

...

var
s: String;
begin
s := TNetEncoding.Base64String.Encode('asjjdhgfaoösjkdhföaksjdfhöasjdfhasdkjasdhfköajsjhdfajssssd');
end;