Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Срочно нужен пример исп-я ф. OEMToChar / 2 сообщений из 2, страница 1 из 1
24.09.2002, 15:29
    #32052713
Руслан
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Срочно нужен пример исп-я ф. OEMToChar
Никак не могу перекодировать содержимое строковой переменной (AnsiString).
...
Рейтинг: 0 / 0
24.09.2002, 17:29
    #32052758
ziktuw
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Срочно нужен пример исп-я ф. OEMToChar
В RX-lib например:

Код: plaintext
1.
2.
3.
4.
5.
function OemToAnsiStr(const OemStr: string): string;
begin
  SetLength(Result, Length(OemStr));
  if Length(Result) >  0  then
    OemToCharBuff(PChar(OemStr), PChar(Result), Length(Result));
end;
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Срочно нужен пример исп-я ф. OEMToChar / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]