1. Инициализация графического режимаДля вывода графических изображений на экран турбо Паскаль предоставляет пользователю библиотеку Graph. Общий вид программы с использованием Graph имеет следующий вид: Program имя; Uses Graph; var grDriver, grMode, errCode: integer; begin grDriver:= Detect; {определение номера, установленного в системе драйвера} initGraph (grDriver, grMode,''); {инициализация графического режима} if errCode= grOK then begin { режим открыт и можно работать} end else begin {графический режим не удалось открыть, проанализируйте содержание переменной errCode} end. Замечание. Две кавычки в initGraph правомочны только тогда, когда графическая программа находится в том же каталоге, что и библиотека Graph. В противном случае в кавычках должен стоять путь - указание, где находится библиотека Graph. |