1 578
editací
Změny
Vytvorená stránka „Nastaví velikost vyrovnávací paměti (bufferu) pro překryvné programové segmenty (ovrleje). ;Deklarace procedure OvrSetBuf(Size: Longint); ;Režim :Reálný ;P...“
Nastaví velikost vyrovnávací paměti (bufferu) pro překryvné programové segmenty (ovrleje).
;Deklarace
procedure OvrSetBuf(Size: Longint);
;Režim
:Reálný
;Poznámky
:Případné chyby jsou oznamovány v proměnné OvrResult.
;Viz také
:[[OvrGetBuf]]
:[[OvrInit]]
:[[OvrInitEMS]]
Vzorový příklad
{ Ovrgetbf.PAS }
{ Vzorový příklad pro OvrGetBuf: Pouze v reálném režimu }
{$M 16384,65536,655360}
uses Overlay;
const ExtraSize = 49152; {48K}
begin
OvrInit('EDITOR.OVR');
Writeln('Počáteční velikost bufferu pro ovrleje je ', OvrGetBuf,' bajtů.')
OvrSetBuf(OvrGetBuf+ExtraSize);
Writeln('Buffer pro ovrleje je nyní zvětšen na ', OvrGetBuf,' bajtů.');
end.
[[Category:Overlay]]
;Deklarace
procedure OvrSetBuf(Size: Longint);
;Režim
:Reálný
;Poznámky
:Případné chyby jsou oznamovány v proměnné OvrResult.
;Viz také
:[[OvrGetBuf]]
:[[OvrInit]]
:[[OvrInitEMS]]
Vzorový příklad
{ Ovrgetbf.PAS }
{ Vzorový příklad pro OvrGetBuf: Pouze v reálném režimu }
{$M 16384,65536,655360}
uses Overlay;
const ExtraSize = 49152; {48K}
begin
OvrInit('EDITOR.OVR');
Writeln('Počáteční velikost bufferu pro ovrleje je ', OvrGetBuf,' bajtů.')
OvrSetBuf(OvrGetBuf+ExtraSize);
Writeln('Buffer pro ovrleje je nyní zvětšen na ', OvrGetBuf,' bajtů.');
end.
[[Category:Overlay]]