Inicjowanie trybu graficznego

1/1

Inicjalizacja trybu graficznego

1. „Prosta” inicjalizacja trybu graficznego.

1.1 Ustawienie dostępu do modułów: przykład (w zależności gdzie zainstalowano TP):

Menu główne / Options / Directories / Unit Directiories 
 np. “C:\PROGRA~1\

TP\UNITS

”

1.2. Przykładowy program inicjalizujący i wykorzystujący tryb graficzny.

program grafika;

uses

graph

, crt;

{dołączenie modułu graph}

var ster,tryb:integer;

{deklaracja zmiennych pomocniczych}

begin

ster:=detect;

{detekcja sterownika graficznego}

initGraph(ster,tryb,'C:\progra~1\tp\bgi');

{włączenie trybu graficznego}

line(0,0,100,100);

{narysowanie linii}

repeat until keypressed;

{zatrzymanie programu}

closeGraph;

{wyłączenie trybu graficznego}

readln;
end.

Procedura:

initGraph

.

Działanie: służy do włączenia trybu graficznego.
Składnia:

procedura

initGraph

( var

ster

:integer; var

tryb

:integer;

sciezka

:string);

gdzie:

ster

– sterownik graficzny uzyskany poprzez funkcję

detect

tryb

– tryb graficzny

sciezka

– ścieżka dostępu do pliku sterownika graficznego (do katalogu „

bgi

”)

Procedura

closeGraph;

Działanie: wyłącza tryb graficzny i wraca do poprzedniego trybu tekstowego.