Графическое программирование на Ms Fortran
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: изложение 8 класс, рефераты бесплатно
| Добавил(а) на сайт: Janutan.
Предыдущая страница реферата | 10 11 12 13 14 15 16 17 18 19 20 | Следующая страница реферата
Character facename – имя шрифта.
Выгрузка шрифта.
Выгрузка зарегистрированных шрифтов из памяти осуществляется п/п UnRegisterFonts ()
Пример программы деления экрана на 4 области.
! File: geomshar.for
$DEBUG ! Производит дополнительные проверки при компиляции
$STORAGE:2 ! Переменные и константы целого типа:2-х байтовые (integer*2)
$DECLARE ! Генерация предупреждающих сообщений для необъявленных переменных
include 'fgraph.fi' ! Включение интерфейсов графических функций в начале каждого файла
interface to function getch() ! Объявление ф-ции getch, ее
integer getch [C, alias:'_getch'] ! атрибутов, типов формальных
end ! параметров
program Demonstr_devide_screen ! Объявление головной программы
implicit NONE ! Запретить неявное объявление типов
integer *2 i2 ! Фиктивная переменная
integer getch [EXTERN]
include 'fgraph.fd' ! Объявление типов графических функций, объявление и задание параметров, определение структур (STRUCTURE) в каждой графической п/п
i2=setvideomode($MAXRESMODE) ! Установить видеорежим с max разрешением
call devide_graph_area()
i2=getch() ! Задержка до нажатия клавиши
i2=setvideomode($DEFAULTMODE) ! Установить предыдущий видеорежим
end
! п/п деления экрана на 4 области
subroutine devide_graph_area()
include 'fgraph.fd'
Рекомендуем скачать другие рефераты по теме: 1 класс контрольная работа, диплом школа.
Категории:
Предыдущая страница реферата | 10 11 12 13 14 15 16 17 18 19 20 | Следующая страница реферата
Главная