[Delphi] String --&gt WideString

Jak w temacie :) Chodzi mi o zamiane łańcucha String na WideString
a konkretnie to ma być coś takiego: 'Programy' --&gt 'P'#0'r'#0'g'#0'r'#0'a'#0'm'#0'y'#0;

Pozdrawiam :)

Delphi automatycznie zamienia kodowanie (przynajmniej tak pisze w pomocy). Możesz to sprawdzić.
var
x: ANSIString;
y: WideString;
begin
y := WideString(x);
//Zapisz y do pliku i x do drugiego, jeżeli rozmiar y = 2*x to znaczy, że dokonało konwersji
end;--Jest jeszcze jeden błąd ... :)

Apel: Piszcie w tematach o jaki język programowania chodzi np. : [Delphi], [C++], itp.