Otevřít hlavní menu

CloseGraph

Verze z 4. 10. 2012, 17:01, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky) (1 revízia: Unit Graph)
(rozdíl) ← Starší verze | zobrazit aktuální verzi (rozdíl) | Novější verze → (rozdíl)

Ukončí grafický režim.

Deklarace
procedure CloseGraph;
Režim
Reálný, Chráněný
Poznámky
CloseGraph obnoví režim obrazovky, který byl aktivní před inicializací grafického režimu, a uvolní paměť alokovanou na haldě pro grafický buffer (graphic scan buffer). CloseGraph též uvolní vyrovnávací paměti pro drivery a fonty, pokud byly alokovány voláními procedur GraphGetMem a GraphFreeMem.
Omezení
Je nutno být v grafickém režimu.
Viz také
DetectGraph
InitGraph
RestoreCrtMode
SetGraphMode


Vzorový příklad

{Closegrf.PAS}
{Vzorový příklad pro proceduru CloseGraph.}
uses Graph;
var Gd, Gm: Integer;
begin
  Gd := Detect;
  InitGraph(Gd, Gm, ' ');
  if GraphResult <> grOk then
    Halt(1);
  Line(0, 0, GetMaxX, GetMaxY);
  Readln;
  CloseGraph;   { Vypnutí grafiky }
end.