Вниз
Скачать: 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 вся ветка

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



Память: 0.45 MB
Время: 0.013 c
7-85717
Console
2002-07-16 12:32
2002.09.26
Кнопки и десктоп


14-85681
.nuke
2002-08-29 22:41
2002.09.26
Есть маааненькая проблемка процем


3-85318
Шурик Ш
2002-09-05 15:52
2002.09.26
Один DBGrid на двух Select


7-85713
ReYka
2002-07-12 12:26
2002.09.26
Приложение Сервер под KyLix?


4-85754
Soft(Unpowered Kiborg)
2002-08-10 11:06
2002.09.26
Version Info в Delphi проектах




   Наверх