Главная страница
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.015 c
7-85709
иван
2002-07-16 19:57
2002.09.26
Kernel32.dll


6-85629
Rammst
2002-07-25 17:43
2002.09.26
Mail


1-85559
Shrek
2002-09-12 21:59
2002.09.26
ListView1DrawItem


8-85618
Янушка
2002-05-31 11:15
2002.09.26
О цвете заголовка формы


6-85628
Феликс
2002-07-25 20:11
2002.09.26
Как узнать размер файла, которого я собираюсь скачать из сети?