Модуль CRT, clrscr и кириллица

@Vovcheg · Регистрация: 16.05.2011

Студворк — интернет-сервис помощи студентам

Написал программу. Ввод и вывод строк русскими буквами. После проверки проги, очень не понравилось сохранение всех данных в консоли и я использовал модуль crt и естественно процедуру clrscr. и вот, после очередной проверки у меня вместо фразы "Задайте вопрос" вылезли непонятные мне "кракозябры".
Как с этим бороться? Очень нужно использование clrscr'ина вместе с кириллицой.

Заранее спасибо!

@rangerx · 03.06.2011, 21:53

А до вызова clrscr кириллица выводится нормально? Попробуй установить кодировку вот таким образом

Pascal
1
2
3
4
5
6
7
uses
  Windows;
begin
  SetConsoleCP(1251);
  SetConsoleOutputCP(1251);
  ...
end.

@Vovcheg · 03.06.2011, 22:07 **[ТС]**

Сообщение от rangerx

А до вызова clrscr кириллица выводится нормально?

Нормально. Без clrscr, число с crt модулем невозможно вводить/выводить кириллицу.

Сообщение от rangerx

Попробуй установить кодировку вот таким образом

Тоже самое.

@rangerx · 03.06.2011, 22:45

У меня сейчас к сожалению нет возможности проверить... В общем, попробуй вместо 1251 указать 866. А вообще неплохо бы скрин с этими "кракозябрами" посмотреть...

@Vovcheg · 04.06.2011, 00:41 **[ТС]**

Если указываю вместо 1251 866, кириллица выводится, но если к проге подключить еще и crt - все по прежнему.

@rangerx · 04.06.2011, 11:52

Судя по всему crt как раз и устанавливает 1251, а Free Pascal IDE сохраняет файлы в 866... Попробуй поискать возможность выбора кодировки в настройках самой IDE.

@Vovcheg · 04.06.2011, 14:14 **[ТС]**

Искал - не нашел. Придется выбрать что-то одно... Или кириллица или очистка.

rangerx, спасибо за помощь!

@rangerx · 04.06.2011, 16:28

Сообщение от Vovcheg

Искал - не нашел. Придется выбрать что-то одно... Или кириллица или очистка.

Никто не мешает тебе набить текст программы в стандартном виндовом Блокноте и сохранить файл в 1251

@Vovcheg · 04.06.2011, 16:55 **[ТС]**

Сообщение от rangerx

Никто не мешает тебе набить текст программы в стандартном виндовом Блокноте и сохранить файл в 1251

Не помогло... ;'(
При сохранении в 1251 и копировании в Паскаль вместо русских букаф знаки вопроса.

@rangerx · 04.06.2011, 17:24

Free Pascal IDE это не компилятор. Компилятор это файл, который называется fpc.exe. Тебе не нужно ничего никуда копировать. Открой командную строку и набери
1) cd путь_к_каталогу_с_исходным_файлом
2) fpc.exe имя_исходного_файла.pas
После этого в каталоге с исходником появится рабочая программа, которая будет называться имя_исходного_файла.exe. Запусти её набрав
имя_исходного_файла.exe

@Vovcheg · 04.06.2011, 18:06 **[ТС]**

Теперь русские буквы выводятся отлично, а вот когда вводишь тоже самое...

@Puporev · 04.06.2011, 18:42

Не знаю в чем у Вас проблема, у меня без всяких выкрутасов все работает как нужно.

@rangerx · 04.06.2011, 19:25

Сообщение от Vovcheg

Теперь русские буквы выводятся отлично, а вот когда вводишь тоже самое...

Ты вот эти две функции

Pascal
1
2
SetConsoleCP(1251);
SetConsoleOutputCP(1251);

вызвал в самом начале?

@Vovcheg · 04.06.2011, 19:35 **[ТС]**

rangerx, у тебя работает также как и у Puporev'a?

Сообщение от rangerx

вызвал в самом начале?

Завтыкал. Теперь все нормально. Кроме разве что вот этого:

@rangerx · 04.06.2011, 21:45

Сообщение от Vovcheg

rangerx, у тебя работает также как и у Puporev'a?

У меня она никак не работает, по той простой причине, что она у меня не установлена

Плюс ко всему я сижу под Linux`ом.

Сообщение от Vovcheg

Кроме разве что вот этого:

Ну так верни 866 перед завершением программы.

Добавлено через 10 минут
Только что погуглил.... Попробуй для ярлыка запуска IDE выставить "точечные шрифты" (как я вижу настройки шрифта ты менял). Т.е. верни всё на значения по умолчанию. Не знаю как это может быть связано, но на freepascal.ru ТС это помогло

@Vovcheg · 04.06.2011, 22:04 **[ТС]**

Сообщение от rangerx

Попробуй для ярлыка запуска IDE выставить "точечные шрифты"

Да-да!! Помогло! Огромное спасибо, что не прошел мимо этой темы и помог мне!
Не представляешь как я рад... А то возня со всякими разными кодировками меня никак не устраивала. Кто бы мог подумать, что вся проблема была в шрифте...
Еще раз - огромное спасибо!

Новые блоги и статьи Все статьи Все блоги /
Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .	Фото: Daniel Greenwood kumehtar 13.11.2025	Расскажи мне о Мире, бродяга kumehtar 12.11.2025 — Расскажи мне о Мире, бродяга, Ты же видел моря и метели. Как сменялись короны и стяги, Как эпохи стрелою летели. - Этот мир — это крылья и горы, Снег и пламя, любовь и тревоги, И бескрайние. . .

@Vovcheg 38 / 38 / 18 Регистрация: 16.05.2011 Сообщений: 139

	Модуль CRT, clrscr и кириллица 03.06.2011, 19:18. Показов 23401. Ответов 15 Метки нет (Все метки) Написал программу. Ввод и вывод строк русскими буквами. После проверки проги, очень не понравилось сохранение всех данных в консоли и я использовал модуль crt и естественно процедуру clrscr. и вот, после очередной проверки у меня вместо фразы "Задайте вопрос" вылезли непонятные мне "кракозябры". Как с этим бороться? Очень нужно использование clrscr'ина вместе с кириллицой. Заранее спасибо! 0

@rangerx 2022 / 1621 / 489 Регистрация: 31.05.2009 Сообщений: 3,005
	03.06.2011, 22:45
	У меня сейчас к сожалению нет возможности проверить... В общем, попробуй вместо 1251 указать 866. А вообще неплохо бы скрин с этими "кракозябрами" посмотреть... 0

@Vovcheg 38 / 38 / 18 Регистрация: 16.05.2011 Сообщений: 139
	04.06.2011, 00:41 [ТС]
	Если указываю вместо 1251 866, кириллица выводится, но если к проге подключить еще и crt - все по прежнему. Миниатюры 0

@rangerx 2022 / 1621 / 489 Регистрация: 31.05.2009 Сообщений: 3,005
	04.06.2011, 11:52
	Судя по всему crt как раз и устанавливает 1251, а Free Pascal IDE сохраняет файлы в 866... Попробуй поискать возможность выбора кодировки в настройках самой IDE. 1

@Vovcheg 38 / 38 / 18 Регистрация: 16.05.2011 Сообщений: 139
	04.06.2011, 14:14 [ТС]
	Искал - не нашел. Придется выбрать что-то одно... Или кириллица или очистка. rangerx, спасибо за помощь! 0

@rangerx 2022 / 1621 / 489 Регистрация: 31.05.2009 Сообщений: 3,005
	04.06.2011, 17:24
	Free Pascal IDE это не компилятор. Компилятор это файл, который называется fpc.exe. Тебе не нужно ничего никуда копировать. Открой командную строку и набери 1) cd путь_к_каталогу_с_исходным_файлом 2) fpc.exe имя_исходного_файла.pas После этого в каталоге с исходником появится рабочая программа, которая будет называться имя_исходного_файла.exe. Запусти её набрав имя_исходного_файла.exe 0

@Vovcheg 38 / 38 / 18 Регистрация: 16.05.2011 Сообщений: 139
	04.06.2011, 18:06 [ТС]
	Теперь русские буквы выводятся отлично, а вот когда вводишь тоже самое... 0

@Puporev Почетный модератор 64314 / 47610 / 32743 Регистрация: 18.05.2008 Сообщений: 115,168
	04.06.2011, 18:42
	Не знаю в чем у Вас проблема, у меня без всяких выкрутасов все работает как нужно. Миниатюры 0