Сохраняет в файле F текущее состояние объекта: вызывает унаследованный метод TEMSArea.Store, затем записывает в файл заголовок RegHeadTEMSScreen и поле Mode. Перед обращением к методу файловую переменную F необходимо связать с уже существующим не— типизированным файлом, а сам файл должен быть открыт для записи блоками длиной в 1 байт.

GetScreen Procedure GetScreen;

Перекрывается: Редко

Сохраняет в EMS— памяти текущее состояние экрана. Все текстовые режимы, а также графические режимы адаптера CGA используют менее 16 Кбайт видеопамяти, поэтому их копирование осуществляется в единственную страницу EMS— памяти и происходит очень быстро. Графические режимы EGA/VGA/SVGA требуют более одной страницы для размещения копии экрана, поэтому копирование идет по частям и осуществляется намного медленнее. Части экрана, копируемые в одну страницу EMS, представляют собой узкие горизонтальные полосы. Для EGA/VGA эти полосы содержат по 50 строк развертки, поэтому полная копия состоит из 7 (EGA) или 10 (VGA) полос. Копии полос создаются с помощью процедуры Cetlmage стандартного модуля Graph.

PutScreen Procedure PutScreen;

Перекрывается: Редко

Восстанавливает вид экрана, который был к моменту предыдущего обращения к методу GetScreen, т.е. переносит копию из EMS— памяти на экран.

5.3.2. Глобальные ссылки

В этом разделе описываются все определения интерфейсной части модуля F_EMS.

Процедура DisposeEMSHandle Объявление: Procedure DisposeEMSHandle(var Handle: Word);

Функция: Уничтожает дескриптор Handle и освобождает связанную с ним EMS— память.

Переменная EMSErrorFlag

Объявление: const EMSErrorFlag: Boolean = False;

Функция: Хранит признак успешности предыдущего обращения к объектам и подпрограммам модуля: если после обращения к функциям EMM регистр АН содержит ненулевой код возврата, а также в случае обнаружения других ошибочных ситуаций, в эту переменную помещается значение True, в противном случае — False. Программа пользователя может проверить этот признак для анализа только что завершившегося обращения к методам и подпрограммам модуля.

Функция EMSSeg Объявление: Function EMSSeg: Word;

функция: Возвращает сегментную часть адреса окна, в которое отображаются логические страницы EMS— памяти.

Переменная EMSStatus Объявление: const EMSStatus: Byte;