pch.Add(AnsiToUTF8(name+' = '+inttostr(id)));
pch.SaveToFile('_pch.txt');
файл полюбому в ANSI сохраняется