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

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

Основные процедуры и функции модуля 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 got any 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 GRAPH VAR D,M:INTEGER; BEGIN DetectGraph(D,M); Write('Тип графического адаптера: ',D,'Графический режим: ',M); END.

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

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

GrapgResult;

Пример

USES GRAPH VAR H,k,l: INTEGER; BEGIN DetectGrahp(k,l); InitGraph(k,l,'d:\tp7\bgi\'); H:=GraphResult; If h=0 then write('OK') else Write('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; просмотров: 32 | Поможем написать вашу работу | Нарушение авторских прав




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