Pascal 7 & Objects


         

TEmsStream модуль Objects


-----------------------------------------------------------------

TObject TStream TEmsStream +------+ +-----------------+ +-----------------+ +------| | Status | | Handle | |-Init-| | ErrorInfo | | PageCount | |-Done-| +-----------------| | Position | | Free | | CopyFrom | | Size | +------+ | Error | +-----------------| | Flush | | Init | | Get | | Done | |-GetPos----------| | GetPos | |-GetSize---------| | GetSize | | Put | | Read | |-Read------------| | Seek | | StrRead | | Truncate | | StrWrite | | Write | |-Truncate--------| +-----------------+ | WriteStr | +-----------------+

TEmsStream - это специализированный производный от TStream тип для реализации потоков в памяти EMS. Он предусматривает до- полнительные поля для описателя EMS, счетчика страниц и текущей позиции. TEmsStream переопределяет 6 абстрактных методов TStream, а также обеспечивает специализированный конструктор и деструктор.

При отладке программы, использующей потоки EMS, интегриро- ванная интерактивная среда IDE не может восстановить выделенную вашей программе память EMS, если программа преждевременно прекра- тила работу, или вы забыли вызвать для потока EMS деструктор Done. Освободить принадлежащие потоку страницы EMS может только метод Done (или перезагрузка).



Содержание  Назад  Вперед