Практикум по решению задач на ЭВМ. Тарова И.Н - 13 стр.

UptoLike

ВУЗ: 

ЕГУ им. Бунина | Елец

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

Рубрика: 

Практикум по решению задач на ЭВМ
направлений в современной прикладной информатике. В отличие от базо-
вого Паскаля, современные версии содержат мощные средства разработки
графических программ. Рассмотрим часть соответствующих возможно-
стей Турбо-Паскаля, в котором они реализованы с помощью стандартного
модуля Graph.
Модуль представляет собой мощную библиотеку графических подпро-
грамм универсального назначения, рассчитанную на работу с наиболее
распространенными графическими адаптерами CGA, EGA, VGA, SVGA
IBM-совместимых персональных компьютеров. Подключение модуля
Graph.tpu к программе выполняется директивой uses graph. Инициализа-
ция графического экрана осуществляется с помощью процедуры
Initgraph. Драйвер поддерживает тот или иной режим экрана, табл. 1.
Таблица 1 Некоторые сведения о драйверах и определяемых ими
режимах
Адаптер Драйвер Режим
(Номер, имя)
Разрешимость Число стра-
ниц
OEgalo 640x200 4
EGA EGA
1 Egahi 640x350 2
0 Vgalo 640x200 4
1 Vgalo 640x350 2
VGA VGA
2 Vgalo 640x480 1
Процедура инициализации в Турбо-Паскале имеет три аргумента:
Initgraph (<драйвер>, <режим>, '<путь к драйверу:>’).
Она может быть выполнена так:
uses graph;
var gd, gm: integer; (переменные gd и gm определяют драйвер и ре-
жим)
begin
gd:=vga; gm:=vgahi;
initgraph(gd,gm,'d:\tp55');
…
Первые две команды можно заменить одной: gd:=detect
Целая константа detect=0 в модуле Graph автоматически распознает
драйвер и устанавливает режим максимального разрешения для данной
машины.
Процедура closegraph освобождает память от драйвера и устанавливает
режим работы экрана, который был до инициализации графики. Для об-
наружения ошибок в графике применяются функции graphresult gra-
pherrormsg (код ошибки). Последняя выдает строку сообщения о ха-
рактере ошибки, соответствующей коду.
Процедура Halt останавливает выполнение программы и возвращает
управлеш операционной системе.
13
                       Практикум по решению задач на ЭВМ


   направлений в современной прикладной информатике. В отличие от базо-
   вого Паскаля, современные версии содержат мощные средства разработки
   графических программ. Рассмотрим часть соответствующих возможно-
   стей Турбо-Паскаля, в котором они реализованы с помощью стандартного
   модуля Graph.
      Модуль представляет собой мощную библиотеку графических подпро-
   грамм универсального назначения, рассчитанную на работу с наиболее
   распространенными графическими адаптерами CGA, EGA, VGA, SVGA
   IBM-совместимых персональных компьютеров. Подключение модуля
   Graph.tpu к программе выполняется директивой uses graph. Инициализа-
   ция графического экрана осуществляется с помощью процедуры
   Initgraph. Драйвер поддерживает тот или иной режим экрана, табл. 1.
        Таблица 1 Некоторые сведения о драйверах и определяемых ими
                                      режимах
Адаптер      Драйвер          Режим               Разрешимость     Число стра-
                             (Номер, имя)                          ниц
                               OEgalo               640x200         4
  EGA          EGA
                               1 Egahi              640x350         2
                               0 Vgalo              640x200         4
  VGA          VGA             1 Vgalo              640x350         2
                               2 Vgalo              640x480         1
      Процедура инициализации в Турбо-Паскале имеет три аргумента:
      Initgraph (<драйвер>, <режим>, '<путь к драйверу:>’).
      Она может быть выполнена так:
            uses graph;
            var gd, gm: integer; (переменные gd и gm определяют драйвер и ре-
          жим)
            begin
                 gd:=vga; gm:=vgahi;
                 initgraph(gd,gm,'d:\tp55');
                 …
     Первые две команды можно заменить одной: gd:=detect
     Целая константа detect=0 в модуле Graph автоматически распознает
   драйвер и устанавливает режим максимального разрешения для данной
   машины.
     Процедура closegraph освобождает память от драйвера и устанавливает
   режим работы экрана, который был до инициализации графики. Для об-
   наружения ошибок в графике применяются функции graphresult gra-
   pherrormsg (код ошибки). Последняя выдает строку сообщения о ха-
   рактере ошибки, соответствующей коду.
      Процедура Halt останавливает выполнение программы и возвращает
    управлеш операционной системе.


                                      13