I bölmə t t t

var driver, mode, integer; 

begin 

driver:=detect; {detect-standart sabiti} 

{qrafik rejim verilir} 

initgraph (driver,mode,”); 

if graphresult <> 0 then 

---

begin 

writeln(‘Qrafik rejim ba$ tutmadI’); 

halt 

end; 

 

end. 

 

 

2.  Grafìka  prosedur  və  funksìyaları.  Əvvəlcə  Graph  modulunun 

prosedura və funksìyalarının təsnìfatını verək.  

Graph modulunun proseduraları 

-initgraph  (driver,mode  <’drayverin  ünvanı’>)-Qrafik  rejìm  təsbìt  edìr. 

Əgər  drayver  fayl    kataloqda  olmazsa  onda  onun  ünvanı  (apastroflar 

arasında) verìlməlìdìr. 

-detectgraph  (,)  –Dìsplenìn  xarakterìstìk  qìymətlərìnì  

verìr. 

-setcolor () –fona rəng verìr. 

-putpixel (x,y, ) –(x,y) nöqtəsìnə rəng verìr. 

-line (x1,y1,x2,y2) –ucları (x1,y1) və (x2,y2) nöqtələrì olan parça çəkìr. 

-lineto (x,y) –carì nöqtənì (x,y) –lə bìrləşdìrìr. 

-linerel (dx,dy) –carì nöqtədən verìlmìş artımlarla xətt çəkìr. 

-rectangle  (x1,y1,x2,y2)  –sol-yuxarı  və  saõ-aşaõı  qarşı  künclərì  (x1,y1) 

və (x2,y2) olan düzbucaqlı qurur. 

-setviewport  (x1,y1,x2,y2,  true)  –yenì  qrafìk  xanə  koordìnatları  verìr. 

true –qrafìkìn xanədən kənar hìssəsìnì sìlmə rejìmì təyìn edìr.