Загрузка ...
Пример 1.2.
Создать проект консольного приложения Prg_1_1. Оно должно в символьном режиме выводить на экран фразу «Hello World and Россия!».
Активизировать ИСР. В главном окне выбирается команда Файл=>Создать. Вызывается окно выбора типа проекта:
В нем следует выбрать Custom Program. В окне редактора кода выводится шаблон кода программы на языке FreePascal, отдельное окно будет содержать сообщения.
После занесения в редактор кодов инструкций и сохранения проекта с именем prg_1_1 получаем:
Окно консоли перед закрытием программы:
Есть проблема – неправильное отображение букв кириллицы. Правильное отображение показано на этом же рисунке справа. Причина ошибки – консольное приложение создается в ИСР, где используется операционная система Windows
с кодировкой ANSI, а исполняется под управлением операционной системы MS DOS, использующей кодировку ASCII. Для решения проблемы нужно делать перекодировку букв кириллицы из стандарта ANSI в стандарт ASCII. Для этого проект prg_1_1 изменим на prg_1_1a, добавив ссылку на модуль RusTrans с функцией Rus преобразования строк ANSI в ASCII.
Файлы модуля RusTrans (RusTrans.o, RusTrans.ppu могут находиться в папке модулей ИСР). Чтобы к ним был доступ, в путях нужно указать это место. Для этого следует выполнить команду Проект=>Параметры компилятора. В окне диалога на странице Пути в строке Католог вывода модулей нужно указать место размещения модулей. Это C:\lazarus\units\i386\win32.
Листинг программы
Окно консоли перед закрытием программы:
