Вниз
Скачать: CL | DM;

CONSOLE APPLICATION   Найти похожие ветки 

 
Igor_   (2004-11-01 14:42) [0]

Почему cmd не хочет понимать русского текста?
Т.е.

program Project1;
{$APPTYPE CONSOLE}
uses
 SysUtils;
begin
 write("Привет!");
 readln
end.

выводит на экран какой-то непонятный бред.


 
Добрый дядька ©   (2004-11-01 14:46) [1]

А это заисит от системнх настроек - в какой кодировке работать в консольных приложениях.
Самое простое - использовать по умолчанию(OEM), перекодируя в ту кодировку, которая нужна.


 
Igor_   (2004-11-01 14:52) [2]

А как в консольных приложениях с кодировками работать? Может подскажешь, или ссылочку какую нибудь дашь?


 
Добрый дядька ©   (2004-11-01 15:09) [3]

CharToOem()
WriteLn()

ReadLn()
OemTOChar()


 
palva ©   (2004-11-01 18:08) [4]

Можно просто сохранять программу в кодировке OEM.


 
Добрый дядька ©   (2004-11-01 18:20) [5]

> palva ©   (01.11.04 18:08)
Можно просто сохранять программу в кодировке OEM.

Пробовал?


 
palva ©   (2004-11-01 18:23) [6]

Пробовал. Не из среды Delphi, конечно.


 
palva ©   (2004-11-01 18:28) [7]

Добрый дядька ©   (01.11.04 18:20) [5]
Если русский текст у вас берется не из базы данных и не в результате вычислений, а используются текстовые константы содержащиеся в программе, то достаточно готовить программу в редакторе, поддерживающем OEM кодировку. Это касается не только русских букв но и европейских символов латиницы с диакритическими знаками. Так что такие редакторы имеются и используются не только в России, но и в Европе.


 
Добрый дядька ©   (2004-11-01 18:44) [8]

>palva ©   (01.11.04 18:28)

Ну кто ж работает с консолью только для вывода констант?

Ведь это интерактивная система - ввод и вывод.


 
Igor_   (2004-11-01 20:44) [9]

Добрый дядька ©   (01.11.04 15:09) [3]
CharToOem()
WriteLn()
ReadLn()
OemTOChar()

а OemTOChar() это в каком модуле, дэлфи матерится что это неизвестная переменная и в хэлпе ничо нету по этой ф-ции?


 
Добрый дядька ©   (2004-11-01 20:45) [10]

uses windows

Help-->Windows SDK


 
Igor_   (2004-11-01 20:48) [11]

Тханкс, заработало!



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

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



Память: 0.47 MB
Время: 0.051 c
3-1098125982
MaxN
2004-10-18 22:59
2004.11.14
Соединение с БД


9-1088316706
X-Disa
2004-06-27 10:11
2004.11.14
Asteroid Killer


14-1098438320
zx
2004-10-22 13:45
2004.11.14
Borland Delphi 2005


6-1094208842
ildar_kh
2004-09-03 14:54
2004.11.14
Перезагрузка фрейма


1-1099385372
Sash
2004-11-02 11:49
2004.11.14
excel




   Наверх