Как вывести русский текст в Delphi 10.4.2?

Question

[@ _ @]

Когда пишу обычный русский текст в Rad Studio на Delphi 10, получаю на выходе ???. Как исправить?

spoiler

Comments

[Hemul GM]

Где пишешь? Куда и как вводишь? Куда и как выводишь?

[@ _ @]

Hemul GM, смотри вопросель. Я там добавил...

Answer 1

[Hemul GM]

У тебя проблемы с настройками в ОС. Среда по дефолту собирает как надо и выводит тоже. Тебе, вероятно, нужно указать принудительно кодировку

uses 
  Winapi.Windows;
//Переключение консоли на кодовую страницу CP1251 (Windows-1251).
SetConsoleCP(1251);
SetConsoleOutputCP(1251);

Comments

[@ _ @]

Это в самом коде писать надо? Просто у меня красным подчеркивает

[Александр Скуснов]

Это проблема Командной строки (cmd.exe). Сам хотел вывести иероглифы (Unicode) - чёрта с два. С русским проблем нет. У командного окна есть выбор шрифтов. Ещё зависит, какая система у вас в редакторе кода (бывает win-1251, бывает UTF-8). Даже есть советы вызывать командное окно от Администратора (причём, вы, как хозяин компьютера, тоже можете иметь права Администратора, но windows по умолчанию их может не использовать)
Короче, приятнее выводить в стандартном окне Windows, забудьте про консоль.

[@ _ @]

Александр Скуснов, я тоже так думал, но когда я пишу в cmd echo *русский текст* выводит *русский текст*

[Александр Скуснов]

Может, не совпадают кодировки редактора IDE и командной строки. Ещё надо поиграться со шрифтами.

[Hemul GM]

@ _ @, да, это надо писать в начале кода. Если красным подчеркивает - модуль добавь Winapi.Windows

[Александр Скуснов]

Вот, допустим, у меня в cmd был шрифт Люсинда, русские не отображались. Поставил Courier New, как в Delphi. Но кодировка-то 866 (OEM). Так что надо настраивать.

[Hemul GM]

Александр Скуснов, шрифт в редакторе ни как не влияет на код и тем более на вывод

[Александр Скуснов]

Как же не влияет? Если нет кириллицы, то по-русски не напишешь, если не Unicode, то иероглифы не введёшь.