метрі, тік тӛртбҧрыштың ҥстінде тӛбе қҧруға болатынын (Тор: True) немесе (Тор: False) болмайтынын анықтайды.
Мысалы:
SetFillStyle(1,3); Bar3D(10,10,50,100,10,True);
Көпбҧрыштарды қҧру
Турбо Паскальда ағымды сызықтың түсімен, стилімен және қалыңдығымен кез келген кӛпбұрышты қҧруға мҥмкіндік беретін DrawPoly процедурасы бар.
Оның пішімі мынадай:
DrawPoly(NumPoints:word; var PolyPoints)
PolyPoints - типті емес параметрінде, кӛпбҧрыштың әр қиылысу нҥктесінің координалары жазылады.
NumPoints - параметрі PolyPoints-те жазылған координаталар санын береді.
Ескерту. N тӛбелі тҧйық фигураны сызу ҥшін, DrawPoly процедурасымен тілдесерде N1 координатасын жіберуді ҧмытпау керек, онда N нӛмірлі координата 1-ге тең болады.
Айтылғанды келесі программамен кӛрсетейік:
Program DemoDrawPoly; Экран ортасында қызыл сызықпен үшбұрышты сызатын программа
uses Crt,Graph;
var
DriverVar,ModeVar:integer; PP : array1. . 4of PointType;
xM, yM, xMaxD4,yMaxD4: word;
Страницы: << < 1 | 2