Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Русский текст в консольных приложения [D5]


tenzor ©   (2002-10-08 23:25:00) 

Как писать русским тектстом в консольном приложении. В оболочке русский виден, а выполняю консольное приложение так ерунда.
Как бороться с напастью?


Voldemar   (2002-10-09 02:09:00) [1]


var str1: string;
str2: PChar;

begin
...
...
...
str1:=AnyThing2Output;
str2:=PChar(str1);
CharTOOEM(str2,str2);
str1:=string(str2);
writeln(str1);


Может быть, я что-то лишнее навернул... Не знаю, как writeln (или write) отнесутся к PChar...


Юрий Зотов   (2002-10-09 00:03:00) [2]

Посмотрите SetConsoleCP, SetConsoleOutputCP.


Наверх

Титульная страница Поиск, карта сайта Написать письмо