Bar3d(x1,y1,x2,y2,depth:integer;top:boolean);-protsedurasi oldingi hududi chap yuqori burchagi ( x1,y1) va o‘ng quyi burchagi (x2,y2) nuqtalarda joylashgan parallelepiped tasvirini yaratishda ishlatiladi. - Bar3d(x1,y1,x2,y2,depth:integer;top:boolean);-protsedurasi oldingi hududi chap yuqori burchagi ( x1,y1) va o‘ng quyi burchagi (x2,y2) nuqtalarda joylashgan parallelepiped tasvirini yaratishda ishlatiladi.
- bu yerda :
- -depth-uch o‘lmali tasvirning uchunchi o‘lchami
- - top- parallelepipedning yuqori hududini aks ettirish uchun ishlatiladi, ya’ni “true” qiymtida yuqori hudud aks etirilsa, aksincha holda u “ko‘rinmaydi”.
- Masalan: Bar3d protsedurasi yordamida ekranda parallelepipedning yuqori hududini aks ettirish va aks etirilmasligini namoyish etuvchi dasturni keltiramiz.
- uses graph,crt;
- var gd,gm:integer;
- begin
- gd:=detect;initgraph(gd,gm,'');
- setbkcolor(black);setcolor (magenta);
- begin
- bar3d(100,100,200,200,25,true);
- bar3d(300,100,400,200,25,false);
- end;
- readln;
- end.
FillEllipse (x,y,Rx,Ry:integer)-markazi (x,y nuqtada bo‘lgan gorizontal radiusi Rx-ga, vertikal radiusi Ry-ga teng ellipsni to‘ldirish uchun ishlatiladi.( Rx va Ry-piksellarda) - FillEllipse (x,y,Rx,Ry:integer)-markazi (x,y nuqtada bo‘lgan gorizontal radiusi Rx-ga, vertikal radiusi Ry-ga teng ellipsni to‘ldirish uchun ishlatiladi.( Rx va Ry-piksellarda)
-
- Masalan: fillellipse(340,220,100,50);
-
- Sector(x,y:integer;BegA,EndA,Rx,Ry:word)-protsedurasi markazi (x,y) nuqtada bo‘lgan gorizontal radiusi Rx-ga, vertikal radiusi Ry-ga teng ellipsning boshlang‘ich burchagi BegA-ga, oxirgi burchagi EndA ga teng sektorini aniqlangan shakl bilan to‘ldiradi.
- Masalan: sector (200,200,180,200,55,300);
-
- PieSlice(x,y:integer;BegA,EndA,R:word)-protsedurasi markazi (x,y) nuqtada bo‘lgan radiusi R-teng aylananing boshlang‘ich burchagi BegA-ga, oxirgi burchagi EndA ga teng sektorni berilgan shakl bilan to‘ldiradi.
- Masalan: PieSlice(300,300,145,360,100);
Do'stlaringiz bilan baham: |