Конвертация строки в OEM
Своим опытом делится Slava Kostin:
|
|
{Конвертирует строку в OEM.
Для использования необходимо сделать uses Windows}
function StrToOEM(str: String): String;
begin
Result := str;
CharToOEM(PChar(Result), PChar(Result));
end;
|
[001895]
Содержание Назад Вперед
Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий