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

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

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

Написал программу. Ввод и вывод строк русскими буквами. После проверки проги, очень не понравилось сохранение всех данных в консоли и я использовал модуль 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 выставить "точечные шрифты"

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

Новые блоги и статьи Все статьи Все блоги /
Как использовать Behavior Graph в Unity при создании игрового AI GameUnited 14.04.2025 Искусственный интеллект в играх прошел долгий путь эволюции. От простейших алгоритмов, движущих призраками в Pac-Man, до сложных систем, управляющих поведением персонажей в современных AAA-проектах. . . .	Создание и стилизация списков в SwiftUI mobDevWorks 14.04.2025 Списки — фундаментальный элемент мобильных интерфейсов. От списка контактов до ленты новостей, от настроек до каталога товаров — трудно представить приложение, которое не использовало бы этот. . .	Паттерн SAGA и распределённые транзакции в микросервисной архитектуре stackOverflow 14.04.2025 Переход от монолитной архитектуры к микросервисам принес множество преимуществ: гибкость разработки, независимость развертывания и масштабирования отдельных компонентов. Однако этот переход создал и. . .	Кастомные аллокаторы в C++ и оптимизация управления памятью bytestream 14.04.2025 Работа с памятью в С++ всегда была и остаётся одной из самых увлекательных и сложных задач для программиста. Любой опытный C++ разработчик подтвердит: стандартные механизмы аллокации памяти – штука. . .	Организация сетей в Kubernetes и эффективное развертывание Mr. Docker 14.04.2025 Сетевая инфраструктура Kubernetes представляет собой сложную, но хорошо спроектированную систему, которая позволяет контейнерам взаимодействовать между собой и с внешним миром. За кажущейся простотой. . .
Многопоточность в Rust: Fearless concurrency и практические примеры golander 14.04.2025 Многопоточное программирование связано с рядом известных проблем. Наиболее распространенные из них — гонки данных (data races), взаимные блокировки (deadlocks) и условия гонки (race conditions). Эти. . .	Списки и кортежи в Python: различия, особенности, применение py-thonny 13.04.2025 Python славится своей гибкостью при работе с данными. В арсенале языка есть две основные последовательные структуры данных, которые программисты используют ежедневно — списки и кортежи. Эти структуры. . .	Middleware в ASP.NET Core UnmanagedCoder 13.04.2025 В ASP. NET Core термин "middleware" занимает особое место. Что же это такое? Middleware представляет собой программные компоненты, которые формируют конвейер обработки HTTP-запросов в приложении. . . .	Таблицы лута в Unity с MinMaxCurve и AnimationCurve GameUnited 12.04.2025 Создание сбалансированного лута в играх — задача не из простых. Разработчики постоянно ищут способы настройки систем выпадения предметов, которые будут одновременно справедливыми для игроков и. . .	std::expected в C++: Управление ошибками bytestream 12.04.2025 Обработка ошибок всегда была важной и одновременно сложной задачей в программировании на C++. На протяжении долгого времени разработчики использовали различные подходы: возвращаемые коды ошибок,. . .

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

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

@Vovcheg 38 / 38 / 18 Регистрация: 16.05.2011 Сообщений: 139
	03.06.2011, 22:07 [ТС]
	Сообщение от rangerx А до вызова clrscr кириллица выводится нормально? Нормально. Без clrscr, число с crt модулем невозможно вводить/выводить кириллицу. Сообщение от rangerx Попробуй установить кодировку вот таким образом Тоже самое. 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, 16:28
	Сообщение от Vovcheg Искал - не нашел. Придется выбрать что-то одно... Или кириллица или очистка. Никто не мешает тебе набить текст программы в стандартном виндовом Блокноте и сохранить файл в 1251 0

@Vovcheg 38 / 38 / 18 Регистрация: 16.05.2011 Сообщений: 139
	04.06.2011, 16:55 [ТС]
	Сообщение от rangerx Никто не мешает тебе набить текст программы в стандартном виндовом Блокноте и сохранить файл в 1251 Не помогло... ;'( При сохранении в 1251 и копировании в Паскаль вместо русских букаф знаки вопроса. 1

@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 Почетный модератор 64312 / 47609 / 32742 Регистрация: 18.05.2008 Сообщений: 115,181
	04.06.2011, 18:42
	Не знаю в чем у Вас проблема, у меня без всяких выкрутасов все работает как нужно. Миниатюры 0

@Vovcheg 38 / 38 / 18 Регистрация: 16.05.2011 Сообщений: 139
	04.06.2011, 19:35 [ТС]
	rangerx, у тебя работает также как и у Puporev'a? Сообщение от rangerx вызвал в самом начале? Завтыкал. Теперь все нормально. Кроме разве что вот этого: Миниатюры 0

@rangerx 2022 / 1621 / 489 Регистрация: 31.05.2009 Сообщений: 3,005
	04.06.2011, 21:45
	Сообщение от Vovcheg rangerx, у тебя работает также как и у Puporev'a? У меня она никак не работает, по той простой причине, что она у меня не установлена Плюс ко всему я сижу под Linux`ом. Сообщение от Vovcheg Кроме разве что вот этого: Ну так верни 866 перед завершением программы. Добавлено через 10 минут Только что погуглил.... Попробуй для ярлыка запуска IDE выставить "точечные шрифты" (как я вижу настройки шрифта ты менял). Т.е. верни всё на значения по умолчанию. Не знаю как это может быть связано, но на freepascal.ru ТС это помогло 3

@Vovcheg 38 / 38 / 18 Регистрация: 16.05.2011 Сообщений: 139
	04.06.2011, 22:04 [ТС]
	Сообщение от rangerx Попробуй для ярлыка запуска IDE выставить "точечные шрифты" Да-да!! Помогло! Огромное спасибо, что не прошел мимо этой темы и помог мне! Не представляешь как я рад... А то возня со всякими разными кодировками меня никак не устраивала. Кто бы мог подумать, что вся проблема была в шрифте... Еще раз - огромное спасибо! 1