Сборник заданий для практических занятий по информатике. Крупенников О.Г - 101 стр.

UptoLike

ВУЗ: 

УлГТУ | Ульяновск

Составители: 

Рубрика: 

100
3. Функция GRAPHERRORMSG – возвращает строку сообщения
об ошибке для заданного кода. Выводит расшифровку ошибки, допущен-
ной при настройке графического режима.
Заголовок функции:
FUNCTION GRAPHERRORMSG (CODE: INTEGER): STRING; ,
где CODE – код ошибки.
Инициацию графического режима с автоматическим определением
типа драйвера и режима работы графического адаптера при программи-
ровании на языке FREE PASCAL можно представить следующим обра-
зом:
USES GRAPH;
VAR DRIVER, MODE, ERROR: INTEGER;
BEGIN
DRIVER := DETECT;
INITGRAPH (DRIVER, MODE,’D:\TP7\BGI\EGAVGA.BGI’);
ERROR := GRAPHRESULT;
IF ERROR<>GROK THEN
BEGIN
WRITELN(GRAPHERRORMSG (ERROR));
……
END
ELSE
…… .
4. Процедура CLOSEGRAPH – завершает работу адаптера в графи-
ческом режиме и восстанавливает текстовый режим работы экрана.
Заголовок процедуры:
PROCEDURE CLOSEGRAPH; .
При программировании использование этой процедуры обязательно.
Как правило, CLOSEGRAPH устанавливается перед зарезервированным
словом «END.»(конец программы).

Страницы