Ovrgetbf.PAS

Язык:
Русский
English


 { Пример программы для функции OvrGetBuf }

{$M 16384, 65536, 655360}

uses Overlay;

const ExtraSize = 49152; {48Kб}

begin
  OvrInit('EDITOR.OVR');
 WriteLn('Начальный размер буфера = ', OvrGetBuf,' байт.');
  OvrSetBuf(OvrGetBuf + ExtraSize);
 WriteLn('Размер буфера установлен на ', OvrGetBuf,' байт.');
end.
Тэги:
| G+
Код для вставки: :: :: :: ::
Поделиться: // //