Скачать: CL | DM;

Функция CharToOem   Найти похожие ветки 

← →
KMI ©   (2002-12-09 08:37) [0]

Друзья, есть код для перевода текста в кодировку DOS:

Win:=PChar("Строка текста типа string");
CharToOem(Win, Dos);
TextInDos:= StrPas(Dos);

При его использовании ошибок не выводится, но переменная TextInDos оказывается пустой строкой. Помогите, пожалуйста, найти ошибку...

---

← →
MBo ©   (2002-12-09 08:45) [1]

CharToOem(PChar(Win),Pchar(Dos));
все.

---

← →
Dimka Maslov ©   (2002-12-09 09:34) [2]

Str:="Строка текста типа string";
UniqueString(Str);
CharToOEM(PChar(Str), PChar(Str));

---

← →
KMI ©   (2002-12-09 10:00) [3]

Спасибо огромное, заработало!!! :))

---

← →
Anatoly Podgoretsky ©   (2002-12-09 10:14) [4]

У тебя неизвестная величина - Win, Dos, ты забыл указать их типы и манипуляции с памятью. Так твой код полностью нормальный.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c