powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Срочно нужен пример исп-я ф. OEMToChar
2 сообщений из 2, страница 1 из 1
Срочно нужен пример исп-я ф. OEMToChar
    #32052713
Руслан
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Никак не могу перекодировать содержимое строковой переменной (AnsiString).
...
Рейтинг: 0 / 0
Срочно нужен пример исп-я ф. OEMToChar
    #32052758
Фотография ziktuw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В 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
2 сообщений из 2, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Срочно нужен пример исп-я ф. OEMToChar
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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