Показать сообщение отдельно
  #7  
Старый 09.08.2011, 23:06
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Формат кодировки может быть и 7-битным.
Код:
The OemToChar function translates a string from the OEM-defined character
set into either an ANSI or a wide-character string. (OEM stands for original
equipment manufacturer.) This function supersedes the OemToAnsi function. 

BOOL OemToChar(
    LPCSTR lpszSrc,	// pointer to string to translate 
    LPTSTR lpszDst 	// pointer to buffer for translated string  
   );	
 
Parameters

lpszSrc

Points to a null-terminated string of characters from the OEM-defined
character set. 

lpszDst

Points to the buffer for the translated string. If the OemToChar function is
being used as an ANSI function, the string can be translated in place by
setting the lpszDst parameter to the same address as the lpszSrc parameter.
This cannot be done if OemToChar is being used as a wide-character function. 
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием