HOME ПРИМЕРЫ THANKS НОВИЧКАМ ДОКИ LINKS JavaScript Mail |
|
|
Turbo Pascal Documentation | ||||
Фукнция: Инициализирует подсистему управления оверлеями и открывает оверлейный файл. Описание: OvrInit(имя_файла : string) Примечания: Если в параметре "имя_файла" буквенная мет- ка дисковода или подкаталог не заданы, то подсистема управ- ления оверлеями ищет файл в текущем каталоге, в каталоге, содержащем файлы .ЕХЕ (при работе в ДОС версии 3.х) и в ка- талогах, заданных с помощью переменной операционной среды PATH. Возможные ошибки могут быть получены с помощью пере- менной операционной среды OvrResult. Значение ovrOk говорит об успешном завершении, ovrError показывает, что оверлейный файл имеет неправильный формат, или что программа не содер- жит оверлеев. Значение ovrNotFound означает, что не найден оверлейный файл. В случае ошибки подсистема управления оверлеями остает- ся неустановленной и попытки вызова оверлейной программы приведут к ошибке времени выполнения 208 (Overlay manager not installed - подсистема управления оверлеями не установ- лена). Процедура OvrInit должна вызываться перед любыми други- ми процедурами подсистемы управления оверлеями. Прочее: См. также процедуры OvrGetBuf, OvrInitEMS, OvrSetBuf. Пример: use Overlay; const begin OvrInit('EDITOR.OVR'); if OvrResult <> ovrOk then begin case OvrResult of ovrError: Writeln('Программа не содержимт оверлеев'); ovrNotFound: Writeln('Оверлейный файл не найден'); end; Halt(1); end; end.
Фукнция: Если это возможно, загружает оверлейный файл в расширенную память (EMS). Описание: OvrInitEMS Примечания: Если имеется драйвер расширенной памяти и имеется достаточный объем такой памяти, то данная процедура загружает все оверлеи в расширенную память и закрывает овер- лейный файл. Последующие загрузки оверлеев сводятся просто к быстрой пересылке их из памяти в память. Процедура OvrInitEMS устанавливает также процедуру выхода, котороая при завершении работы программы автоматически освобождает выделенную расширенную память. Возможные ошибки могут быть получены с помощью перемен- ной операционной среды OvrResult. Значение ovrOk говорит об успешном завершении, ovrError показывает, что процедура OvrInit завершилась неудачно или не была вызвана, ovrIOError говорит о том, что при чтении оверлейного файла произошла ошибка, ovrNoEMSDriver означает, что не найден драйвер рас- ширенной памяти, ovrNoEMSMemory - что для загрузки оверлей- ного файла в расширенной памяти нет достаточного простран- ства. В случае ошибки подсистема управления оверлеями будет продолжать работу, но оверлеи будут считываться с диска. Драйвер расширенной памяти должен отвечать соглашениям фирм Лотус, Интел и Микрософт (Expamded Memory Specification - EMS). Если вы используете псевдодиск, размещенный в расши- ренной памяти, нужно убедиться в том, что команда, содержа- щаяся в файле CONFIG.SYS и загружающая драйвер псевдодиска оставляет некоторый свободный объем расширенной памяти, ко- торый может использовать ваша прикладная задача. Прочее: См. также процедуры OvrGetBuf, OvrInit, OvrSetBuf. Пример: use Overlay; const begin OvrInit('EDITOR.OVR'); if OvrResult <> ovrOk then begin Writeln('Подсистема управления управления оверлеями не установлена из-за ошибки'); Halt(1); end; OvrInitEMS; case OvrResult of ovrIOError: Writeln('Ошибка ввода-вывода при чтении оверлейного файла'); ovrNoEMSDriver: Writeln('Не установлен драйвер расширенной памяти'); ovrNoEMSMemory('Не хватает объема расширенной памяти'); else Writeln('Для более быстрой работы с оверляеми используется расширенная память'); end; end. |
HOME |