How can I convert my memo.text to UTF-8? I used this function but it does not work properly...
function TForm1.EncodeAsUTF8(UnicodeStr: string): AnsiString; var UTF8S