Текущий архив: 2003.01.16;
Скачать: CL | DM;

Вниз

Вывод текста в приложении ($APPTYPE CONSOLE) русскими буквами...   Найти похожие ветки 

← →
KPV-10k ©   (2003-01-07 21:21) [0]

Уважаемые МАСТЕРА! Ответьте пожалуйста на вопрос: Как сделать так, чтобы в моём приложении ($APPTYPE CONSOLE) можно было корректно выводить русские буквы, а не что-то типа ЋЎ­®ўЁвмЋЎ­®ўЁ.. (Я пользуюсь WriteLn("русский текст");)

---

← →
Anatoly Podgoretsky ©   (2003-01-07 21:27) [1]

Есди у тебя консоль поддерживает русские буквы, то CharToOem

---

← →
KPV-10k ©   (2003-01-07 21:36) [2]

Спасибо...

---

← →
TTCustomDelphiMaster ©   (2003-01-07 21:41) [3]

function StrToOem(const AnsiStr: string): string;
begin
SetLength(Result, Length(AnsiStr));
if Length(Result) > 0 then
CharToOem(PChar(AnsiStr), PChar(Result));
end;

begin
writeln(StrToOem("Абракатабра"));
readln
end.

---

← →
Оливейра ©   (2003-01-07 21:53) [4]

Усложнять просто :-) Проще надо, братцы!

writeln("kpyt0 3|-|a|-0 WinAPI!");

---

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

Текущий архив: 2003.01.16;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.022 c