GraphDefaults

Z Delphi & Pascal (česká wiki)
Skočit na navigaci Skočit na vyhledávání

Vrátí ukazatel aktuální pozice (CP) do výchozí pozice a obnoví implicitní nastavení grafiky.

Deklarace
procedure GraphDefaults;
Režim
Reálný, Chráněný
Poznámky
Vrátí ukazatel aktuální pozice CP (current pointer) do výchozí pozice a znovunastaví grafický systém na implicitní hodnoty pro
  • výřez (viewport)
  • paletu
  • kreslící barvy a barvy pozadí
  • styl čáry a vzorek čáry
  • styl, barvu a vzorek vyplňování
  • aktivní font, styl textu, zarovnávání textu a uživatelskou velikost znaků
Omezení
Je nutno být v grafickém režimu.


Vzorový příklad

{Grfdeflt.PAS}
{Vzorový příklad pro proceduru ýGraphDefaultsý.}
uses
  Crt, Graph;
var
  Gd, Gm : Integer;
begin
  Gd := Detect; InitGraph(Gd, Gm, ' ');
  if GraphResult <> grOk then Halt(1);
  SetColor(1);
  OutText('Tento text je v barvě #1');
  ReadLn;
  ClearViewPort;
  GraphDefaults; { Inicializuje režim }
  OutText('Tento text je v implicitní barvě');
  ReadLn;
  CloseGraph;
end.