OvrInitEMS

Z Delphi & Pascal (česká wiki)
Verze z 3. 10. 2012, 20:40, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky) (Vytvorená stránka „Zavede ovrlejový soubor do paměti EMS, pokud je to možné. ;Deklarace procedure OvrInitEMS; ;Režim :Reálný ;Poznámky :Případné chyby jsou oznamovány v pro...“)
(rozdíl) ← Starší verze | zobrazit aktuální verzi (rozdíl) | Novější verze → (rozdíl)
Skočit na navigaci Skočit na vyhledávání

Zavede ovrlejový soubor do paměti EMS, pokud je to možné.

Deklarace
procedure OvrInitEMS;
Režim
Reálný
Poznámky
Případné chyby jsou oznamovány v proměnné OvrResult.


Viz také
OvrGetBuf
OvrInit
OvrSetBuf


Vzorový příklad

{ Ovrinems.PAS }
{ Vzorový příklad pro OvrInitEMS: Pouze v reálném režimu }
uses Overlay;
begin
  OvrInit('EDITOR.OVR');
  if OvrResult <> ovrOk then
  begin
    Writeln('Inicializace správce ovrlejí selhala.');
    Halt(1);
  end;
  OvrInitEMS;
  case OvrResult of
    ovrIOError: Writeln('V/V chyba souboru ovrlejí.');
    ovrNoEMSDriver: Writeln('Driver EMS není nainstalován.');
    ovrNoEMSMemory: Writeln('Nedostatek paměti EMS.');
    else Writeln('Používá se EMS pro rychlé vyměňování ovrlejí.');
  end;
end.