Студопедия  
Главная страница | Контакты | Случайная страница

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатика
ИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханика
ОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторика
СоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансы
ХимияЧерчениеЭкологияЭкономикаЭлектроника

Основные процедуры и функции модуля GRAPH.

Читайте также:
  1. Cудeбныe функции князя и вeчe
  2. I. Основные задачи и направления работы библиотеки
  3. I. Основные парадигмы классической социологической теории.
  4. I. ОСНОВНЫЕ ПОЛОЖЕНИЯ УЧЕБНОЙ ПРАКТИКИ
  5. I. ОСНОВНЫЕ ПОЛОЖЕНИЯ. РУКОВОДСТВО ПОДГОТОВКОЙ И НАПИСАНИЕМ КУРСОВОЙ РАБОТЫ
  6. I. Основные свойства живого. Биология клетки (цитология).
  7. I. Основные цели
  8. I. Правосознание: понятие, структура, функции и виды.
  9. I. Сущность, формы, функции исторического знания.
  10. II. МЕТОДЫ, ПОДХОДЫ И ПРОЦЕДУРЫ ДИАГНОСТИКИ И ЛЕЧЕНИЯ

Местоимение some (немного, некоторое количество) употребляется перед неисчисляемыми существительными в утвердительных предложениях, например: I have got some water. У меня есть вода. В вопросительных и отрицательных предложениях вместо some употребляется местоимение any. Have you got any water?I haven’t gotany water. или I have no water.

  + body (лицо) + thing (предмет) + where (место)
some somebody кто-либо something что-либо somewhere где-либо
any anybody anything anywhere
no nobody никто nothing ничто nowhere нигде
every everybody каждый everything каждый everywhere везде

 

Графика в паскале.

Графические функции паскаля описаны в модуле GRAPH. Модуль подключается к программе с помощью ключевого слова USES.
Пример:

program t34; Uses graph; Var ... ...

Основные процедуры и функции модуля GRAPH.

Процедура InitGraph инициирует перевод видеоадаптера в видеорежим. Общий вид:

InitGraph(Driver,Mode,Path);

Driver - параметр, определяющий графический драйвер; 0 - автоопределение,9 - VGA.
Mode - параметр, задающий один из графических режимов. Для VGA 0 - 640X200 16 цветов, 1- 640Х350 16 цветов, 2 - 640Х480 16 цветов. Если стоит автоопределение, то параметр Mode надо задавать, выбор будет сделан в пользу максимально возможного из режимов.
Path - имя файла и путь графического драйвера. Указывать надо только путь. Обычно в Паскале используется egavga.bgi. Он расположен в каталоге(например): D:\tp7\BGI\
Пример:

InitGraph(9,2,'d:\tp7\bgi\') ;


Замечание редактора:указанный пример не будет работать, так как первые два аргумента у процедуры InitGraph - параметры-переменные. То есть, числа 9 и 2 надо поместить в переменные типа Integer, и имена этих переменных ставить в качестве первых двух аргументов:

var gd,gm: integer.........gd:=9;gm:=2;InitGraph (gd,gm,'d:\tp7\bgi\');

Процедура DetectGraph - тестирует аппаратуру и определяет, какой графический драйвер и режим (максимально допустимые) подходят для данного видеоадаптера.
Общий вид:

DetectGraph (Driver,Mode);

Driver - параметр, определяющий подходящий тип графического драйвера.
Mode - параметр, задающий один из графических режимов, поддерживаемых данным драйвером.
Пример

USES GRAPHVAR D,M:INTEGER;BEGIN DetectGraph(D,M); Write('Тип графического адаптера: ',D,'Графический режим: ',M);END.

Если видеоадаптер не был найден, то переменная Driver вернет значение -2.

Функция GraphResult - возвращает код ошибки графической операции, выполнявшейся последней.
Общий вид:

GrapgResult;

Пример

USES GRAPHVAR H,k,l: INTEGER;BEGIN DetectGrahp(k,l); InitGraph(k,l,'d:\tp7\bgi\'); H:=GraphResult; If h=0 then write('OK') elseWrite('Error');END.

Значения возвращаемые GraphResult:
&nbsp0 - без ошибок
-1 - не инициализирован граф. режим
-2 - не удалось определить тип адаптера
-3 - не обнаружен файл с драйвером
-4 - Обнаруженный файл не содержит соответствующего драйвера
-5 - недостаточно памяти для загрузки драйвера
-6 - недостаточно памяти для просмотра областей
-7 - недостаточно памяти для заполнения областей
-8 - не обнаружен файл со шрифтом
-9 - недостаточно памяти для загрузки шрифта
-10 - недопустимый режим для выбранного драйвера
-11 - общая ошибка
-12 - ошибка ввода-вывода
-13 - неверный формат шрифта
-14 - неверный номер шрифта

Функция GraphErrorMsg - возвращает текст, по-английски, сообщения об ошибке.
Пример.

...GraphResult(i);GraphErrorMsg(i);...

Процедура RestoreCrtMode - осуществляет переход в видеорежим (текстовый), который использовался до перехода в графический режим. Не освобождает память и не сбрасывает параметры графического режима.
Пример.

...RestoreCrtMode:...

Процедура SetGraphMode - устанавливает для используемого драйвера новый графический режим и очищает экран. Переходит в один из доступных режимов для данного драйвера (в отличие от InitGraph). Общий вид:

SetGraphMode(Mode);

Mode - целое число от 0 до 5, определяющее режим. С помощью SetGraphMode можно переходить в другой графический режим, отличный от используемого. Совместно с процедурой RestoreCrtMode может использоваться, чтобы временно и быстро переходить из графического в текстовый режим и обратно.
SetGraphMode устанавливает для всех графич. параметров (палитра, цвет, и т. п.) значения по умолчанию, заданные для данного режима.

Функция GetGraphMode - возвращает числовой код используемого в данный момент графического режима. Для VGA это 0,1 или 2.
Пример

...Var I: integer;... I:=GetGraphMode;:...

Функция GetModeName - возвращает строку с именем используемого графического режима.
Пример.

...Var I: integer;...I:=GetGraphMode;Write('Графический режим: ',GetModeName(i));...

Функция GetDriverName - возвращает имя (без расширения) используемого в данный момент драйвера.
Пример.

...Var I:string;...I:=GetDriverName; Write('Драйвер: ',i);...

или

...Write('Драйвер', GetDriverName);...

Функция GetMaxMode - возвращает код предельного графического режима загруженного драйвера, в котором может работать графический адаптер.
Пример.

USES GRAPH;VAR I:INTEGER;BEGIN INITGRAPH(0,0,'');(*ИЩЕМ ДРАЙВЕР В КАТАЛОГЕ С ПРОГРАММОЙ*) (*ред.:этот пример опять не работоспособен*) I:=GetMaxMode;...END.

Процедура GetModeRange - возвращает диапазон допустимых графических режимов для указанного драйвера.
Общий вид:

GetModeRange(Driver,MinMode,MaxMode);

Driver - код графического драйвера, MinMode - код <минимального> режима, MaxMode - код предельно допустимого режима для данного драйвера.
Пример.

...Var minmod,maxmod:integer;...GetModeRange(9,minmod,maxmod);Write('Минимальный режим: ',minmode,'Предельный режим: ',maxmode);...

Процедура CloseGraph - Восстанавливает видеорежим (текстовый), использовавшийся до перехода в графический режим, освобождает память от графических буферов и драйвера.
Пример.


Дата добавления: 2014-12-19; просмотров: 16 | Нарушение авторских прав




lektsii.net - Лекции.Нет - 2014-2020 год. (0.011 сек.) Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав