Показать сообщение отдельно
Старый 27.06.2008, 22:55   #17  
Иван33 is offline
Иван33
Участник
 
38 / 10 (1) +
Регистрация: 15.12.2007
Цитата:
Сообщение от apanko Посмотреть сообщение
Для utf-8 легко:

Код:
 

myFile.CREATETEMPFILE;
myFile.CREATEOUTSTREAM(myOutStream);
XMLPORT.EXPORT(MyXMLPort,myOutStream);
myFile.CREATEINSTREAM(myInStream);
bigText.READ(MyInStream);
myFile.CLOSE;
bigtext.ADDTEXT('<?mytag?>',55);

IF EXISTS('C:\123.xml') THEN
  ERASE('C:\123.xml');

myFile.CREATE('C:\123.xml');
myFile.CREATEOUTSTREAM(myOutStream);
bigText.WRITE(myOutStream);
myFile.CLOSE();
С utf-16 надо перекодировать строку, и начинать с 110.
Надо признать, что с наскоку перекодировка не далась.
спасибо за почин (а то сразу судить, чай не в Нюрнберге живём), ну а структуру эксемеля итоговую чего не дали?
вы реализовали классический случай, когда эксемель делается с нуля. но есть ещё другой клинический, когда есть эксемель сделанный xml-портом, или сторонним производителем (проблема кодировки не возникает).