Главная страница
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.016 c
3-85310
AFrolov
2002-09-06 15:25
2002.09.26
Сортировка набора данных


1-85549
race1
2002-09-13 11:28
2002.09.26
картинка


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


1-85528
Dark Hunter
2002-09-13 14:06
2002.09.26
Динамическое PopupMenu...


1-85514
konrads
2002-09-17 09:57
2002.09.26
Подскажите ссылку на RX-Lib для