OvrGRtry.PAS

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


 { Пример программы для OvrGetRetry }

{$M 16384, 65536, 655360 }

uses Overlay;

const ExtraSize = 49152; { 48Kб }

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