GraphDefaults
Verze z 4. 10. 2012, 17:01, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky) (1 revízia: Unit Graph)
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.