Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.09.26;
Скачать: CL | DM;

Вниз

SetConsoleCP & SetConsoleOutputCP   Найти похожие ветки 

 
DarkGreen   (2002-09-16 14:36) [0]

Доброе время суток Мастера!
Пытаюсь установить кодовую страницу для консольного приложения (код ниже) страница устанавливается (функции возвращают истину) но результат 0, на консоли отображается китайские иероглифы :-/.


program CodePage;
{$APPTYPE CONSOLE}
uses
Windows,
SysUtils;
begin
{ TODO -oUser -cConsole Main : Insert code here }
WriteLn("Кодовая страница консоли для ввода:", GetConsoleCP);
WriteLn("Кодовая страница консоли для вывода:", GetConsoleOutputCP);
WriteLn("Устанавливаем кодовую страница консоли для ввода 1251:", SetConsoleCP(1251));
WriteLn("Устанавливаем кодовую страница консоли для вывода 1251:", SetConsoleOutputCP(1251));
end.


 
Andre V.   (2002-09-16 14:43) [1]

Драйвера в системе ЕСТЬ??????
Имею загруженными....


 
DarkGreen   (2002-09-17 05:21) [2]

Все, разобрался сам. Кому интересно, вот решение. Для того, чтобы SetConsoleOutPutCP работала, необходимо:
1. Операционная система Win NT (2000, XP). 95, 98, Me - не поддерживаются.
2. В настройках консоли стоял не точечный шрифт, а Lucida Console.
В общем все. Инфу нашел на MSDN



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

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

Наверх




Память: 0.47 MB
Время: 0.022 c
6-85624
Александр_
2002-07-22 11:08
2002.09.26
формат строки запроса IE


3-85320
GWeber
2002-09-04 12:25
2002.09.26
Как работать с .mdb базой _БЕЗ_ BDE?


14-85693
France
2002-09-02 09:25
2002.09.26
Переименовать Пуск Программы <Группа> <ярлык>


3-85371
v
2002-09-02 16:30
2002.09.26
Как сменить пароль в таблицах Paradox


4-85745
Meow
2002-06-11 12:36
2002.09.26
Количество страниц, распечатанных принтером