Процедуры для работы с текстом

Итак, для запуска графической системы нам необходимо:

1. Подключить модуль GRAPH – библиотеку графических процедур:

Uses Graph;

2. Установить графический режим с помощью двух переменных:

Var

GraphDriver, GraphMode: integer;

Begin

GraphDriver:=detect;

InitGraph(GraphDriver, GraphMode, '..\BGI');

{ С этого момента все графические средства доступны пользователю }

{ тело программы }

CloseGraph;

End.

Задание. Наберите шаблон для программы, работающей в графическом режиме. Нам он понадобиться в дальнейшем.

Внимание! Прежде чем запустить программу на выполнение, необходимо на компьютере установить маршрут поиска файлов каталога BGI. Для этого выполните следующее:

F10 – Options – Directories

В окне EXE&TPU directory набрать ..\BGI

Клавишей TAB перейти к окну Unit directories и набрать ..\BGI

Клавишей TAB перейти к ОК и нажать Enter.