Jak uzyskać takie kodowanie ?

Witajcie !

Jedna z aplikcaji, z którą współpracuje mój program zapisuje tekst do pliku tekstowego za pomocą jakiegoś kodowania.
Dla przykładu, sekwencja "próba języka" zapisywana jest jako pr\xc3\xb3ba j\xc4\x99zyka
Czy to symbole utf-8 ?
Wiecie może w jaki sposób mógłbym konwertować i zapisywać tekst z taką własnie symboliką ?

ta, to znaczki UTF zakodowane czymśtam (whatever)

żeby zakodować musisz najpierw znaleźć jakiś komponent zamieniający kodowanie Windows -> UTF-8 a potem możesz użyć podobnej procedury:

function koduj(sIn: string): string;
var sOut: string; i: integer;
begin
  sOut := '';
  for i := 1 to Length(sIn) do
    if not (sIn[i] in
       ['a'..'z', 'A'..'Z', '0'..'9', ' ']) then
      sOut := sOut + '\x' +
        IntToHex(Ord(sIn[i]), 2) else
      sOut := sOut + sIn[i];
  Result := sOut;
end;

function dekoduj(sIn: string): string;
var sOut: string; i, j, k: integer;
  s: string;
begin
  SOut := '';
  i := 1;
  j := Length(sIn);
  while i <= j do begin
    s := Copy(sIn, i, 4);
    if (Copy(s, 1, 2) = '\x') and
      (TryStrToInt('$' + Copy(s, 3, 2), k)) then begin
          sOut := sOut + Chr(k);
          Inc(i, 3);
    end else sOut := sOut + s[1];
    Inc(i);
  end;
  Result := sOut;
end;

Wielkie dzięki Adamo za zabranie głosu w dyskusji.
Właśnie trwają moje poszukiwania. Mam tu komponenty kodujące do mimebase64, do QuotedPrintable i inne, a jak na złość nie mogę znaleźć takiego kodera. W każdym razie dzięki za pomoc.