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.

Inicjowanie trybu graficznego

1/1