Вторая версия, теперь есть кодирование и декодирование.
Кодирование производится функцией encodestring,
декодирование - функцией decodestring
JAVA:
public static String encodestring(String string);
public static String decodestring(String string);
PASCAL:
function encodestring(string:string):string;
function decodestring(string:string):string;
Пример использования:
program base64edtest;
uses base64v2;
var
s:string;
begin
s:=encodestring('string1');
drawtext(s,0,0);
S:=decodestring(s);
drawText(s, 0, 10);
repaint;
delay(2000);
end.