HOME ПРИМЕРЫ THANKS НОВИЧКАМ ДОКИ LINKS JavaScript Mail


 
В этот день много лет назад...
19 апреля. В 1932 году (86 лет назад) - На ленинградском заводе "Коминтерн" приступают к изготовлению самой большой в мире 500-ваттной радиостанции.
 
 

Turbo Pascal Documentation

Процедура OvrGetBuf

Модуль Overlay


     Функция: Возвращает текущий размер оверлейного буфера.
     Описание: OvrGetBuf
     Тип результата: Длинный целый (longint).
     Примечания: Размер оверлейного буфера устанавливается с
помощью обращения к процедуре OvrSetBuf. Первоначально овер-
лейный буфер имеет минимальный возможный размер,  соответст-
вующий  размеру наибольшего оверлея. При выполнении оверлей-
ной программы буфер такого размера выделяется автоматически.
(Замечание:  Начальный  размер  буфера  может превышать 64К,
поскольку он включает в себя и код  наибольшего  оверлея,  и
его корректировочную информацию).
     Прочее:  См.  также  процедуры   OvrInit,   OvrInitEMS,
OvrSetBuf.
     Пример:

  {M 16384,65536,655360 }
  use Overlay;
  const
    ExtractSize = 49152; { 48K }
  begin
    OvrInit('EDITOR.OVR');
    Writeln('Начальный размер оверлейного буфера = ',
             OvrGetBuf, 'байтов');
    OvrSetBuf(OvrGetBuf+ExtractSize);
    Writeln('Размер оверлейного буфера увеличен теперь до ',
             OvrGetBuf, 'байтов');
  end.




HOME