[fpc-pascal] converting to UTF8

[cibersvaa at ciberpiula.net]

Lazarus 2.012
FPC: 3.2.0
SVN: 64642
OS: Windows 10 Pro/win64

I'm reading from a file with character set win1252, I want to convert  
it to utf8, but I can't.

procedure TestString;
var
   Original:string;
   Converted:string;
begin
   original:='ESPA'#209'A'; //ESPAÑA WIN1252
   Converted:=ansiToUtf8(original);  // converts to 'ESPA'#239#191#189'A'
  // converted Should be 'ESPA'#195#145'A'
end;

I've tried playing with strings types, string, rawstring,ansistring,  
utf8string. No way. Any hint?

------------
Saludos
Santiago A.