Показать сообщение отдельно
Старый 02.02.2007, 12:11   #3  
unalexia is offline
unalexia
Участник
 
79 / 10 (1) +
Регистрация: 28.12.2005
Цитата:
Сообщение от Kashin Посмотреть сообщение
У меня в локализованном кодюните 12400 есть две функции

WinToDos(VAR Text : Text[1024]) : Text[1024]
Text := CONVERTSTR(Text,Text0001,Text0002);
EXIT(Text);

DosToWin(VAR Text : Text[1024]) : Text[1024]
Text := CONVERTSTR(Text,Text0002,Text0001);
EXIT(Text);
, где
Name ConstValue
Text0001 АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯаббвгдежзийклмнопЂ¦Ѓ‚ѓ„…†‡?‰Љ‹¬ЊЌЋЏђ‘’“”•–—?™љ
›њќћџЈҐ©«­®±Ііґµ»рстуфхцчшщъыьэюяЁёЄєЇїЎў°ј·Ѕ№¤ѕ 
Text0002 ЂЃ‚ѓ„…†‡?‰Љ‹ЊЌЋЏђ‘’“”•–—?™љ›њќћџ ЎЎўЈ¤Ґ¦§Ё©Є«¬­®Ї°±Ііґµ¶·ё№є»јЅѕїАБВГДЕЖЗИЙКЛМНО
ПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмнопрстуфхцчшщъыьэюя
а можно по e-mail anlex@mail.ru прислать объект (в текстовом формате). мне очень важны переменные Text0001 и Text0002, а при копировании из данного сообщения они искажаются.....