Информатика. Часть 1. Мойзес О.Е - 106 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

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

Рубрика: 

106
4
640
∗200
2
2.EGA (3) 0
640
∗200
16
1
640
∗350
16
3.Hercules (7) 0
720
∗348
2
4.VGA (9) 0
640
∗200
16
1
640
∗480
16
Модуль Graph подключается при помощи USES Graph;. С
момента подключения модуля становятся доступными все находящиеся
в нем модули.
Процедура инициализации:
InitGraph(
var GraphDriver:integer ; {тип адаптера}
Var GraphMode:integer; {режим графики}
Var DriverPath:string {путь к драйверу}) .
Рассмотрим пример инициализации (установки) графического
режима:
uses Graph;
var
Gd,Gm:integer;
begin
Gd:=Detect;
InitGraph(Gd,Gm,'');
if GraphResult<>grOk then Halt(1);
...
CloseGraph
end.
Графический режим инициализируется с помощью стандартной
процедуры
InitGraph. При этом переменным Gd и Gm необходимо
указать номер адаптера и номер графического режима. Если переменной
Gd предварительно присвоить значение константы Detect, описанной в
модуле Graph (ее значение 0), то при загрузке драйвера программа
выполнит автоматическое распознавание типа адаптера. При этом, если
есть выбор графических режимов, устанавливается тот из них, который
обеспечивает более высокое качество изображения
. Третий параметр
процедуры InitGraph - путь до файла с загрузочным модулем драйвера.
Если путь отсутствует, то поиск этого файла будет осуществляться в
текущем каталоге. Ошибки, которые могут возникать при
инициализации графического режима, анализируют с помощью
функции GraphResult. Для выхода из графического режима используется
стандартная процедура CloseGraph. Эта процедура восстанавливает
режим, существовавший до инициализации графики.

Страницы