Графикалық обьектілер




Презентация қосу
Сабақтың тақырыбы

Графикалық обьектілер
Сабақтың мақсаты:
Білімділік. Оқушыларды компьютермен текстік және
графикалық обектілермен жұмыс істеп үйрену және
әдістерін біліу іс-әрекетін ұйымдастыру;
Дамытушылық. Оқушының бірлескен әрекеттер
құндылығын сензінуіне көмектесу;
Тәрбиелік.Оқушыларды өздігінен жұмыс істеуге
және адамгершілікке баулу.
Сабақтың түрі:жаңа
сабақ
Сабақтың әдісі: түсіндірмелі
Сабақтың көрнекілігі: экран,
компьютер, слайдтар
Сабақтың барысы:
1. Ұйымдасытру кезеңі: (1-2 мин)
Оқушылармен амандасу, түгендеу,
сабаққа даярлығын қадағалау
Компьютермен текстік және графикалық режимде жұыс
істеу кезінде мынадай процедуралары мен функциялары
бар модульдермен танысамыз:

1. Сурет салу және тексті шығару үшін қажет Graph және
Crt модульдерінің процеуралары мен функциялары.
2. Сызықтың типі, үлгісі және қалыңдығы(SetLineStyle
процедурасы).
3. Қаріптерді басқару(SetTextStyle процедурасын).
4. Штрихтау тұрақтылары d (SetFillStyle процедурасы).
5. Текст түрлері C (Text Color).
Процедураларсыз күрделі программалар құруға болмайды. Pascal –дағы ірірек
бірліктер бұл – көптеген процедуралары мен функциялары бар
модульдер. Модульдер – тәуелсіз программалар.Модульді программаға
қосу үшін оның атын көрсету жеткілікті:
USES модуль аты
Компьютермен текстік және графикалық режимде жұмыс істеу үшін сәйкес стандартты
кітапханалық модулдерді қосу қажет:
USES crt
USES graph
Графикамен жұмыс жасаудың алдында монитордың ең келісімді бейнережимін орнату
керек.driver:=detect командасы detect стандартты константаның көмегімен
драйвердің типін анықтайды. Graph модулінің InitGraph процедурасы драйвердің
типін, орналасуын және оның жұмысы режимін(шешілуін ,палитра типін) көрсете
отырып, графикалық режимді ынталандырады:
InitGraph (driver, mode, ‘C\TP7\bgi’);
Процедура не функция Арналу міндеті
Моуль Graph
Circle (x,y,R) Шеңбер
Line (x1,y1,x2,y2) Сызық
Putpixel (x,y,c) Нүкте
Rectangle(x1,y1,x2,y2) Тіктөртбұрыш
Setbkcolor(c) Фон түсі
Setcolor(c) Сурет салу түсі
Fillellipse(x,y,R1,R2) Боялған эллипс
Bar(x1,y1,x2,y2) Боялған тікбұрыш
50 100 150 200250300350 400 450500550 600 640
О Х

100
150
200
250
300
350
400 Х=640
440
480

Y=480

У
Мысалы: Нүкте салу керек
50 100 150 200250300350 400 450500550 600 640
О Х
Х
100
150
Putpixel(x,y,c)
200
250 У
300
350
400 Program suret;
Uses graph;
440 Var driver,mode:integer;
480 Begin
Driver:=detect; initgraph(driver, mode,’c;\tp7\bgi’);
Putpixel (150,200,4);
Readln;
Closegraph;
End.
У
Мысалы: шеңдер салу керек

50 100 150 200250300350 400 450500550 600 640
О Х

100
Х
150
200 Circle(x,y,R)
250 У
300
R
350
Program suret;
400
Uses graph;
440 Var driver,mode:integer;
480 Begin
Driver:=detect; initgraph(driver, mode,’c;\tp7\bgi’);
Putpixel (150,200,4);
Circle (150,200,50);
Readln;
Closegraph;
У End.
Мысалы: Cызық салу керек
50 100 150 200250300350 400 450500550 600 640
О Х

100 Line(x1,y1,x2,y2)
150
200
250
300
350
400
Program suret;
440 Uses graph;
480 Var driver,mode:integer;
Begin
Driver:=detect; initgraph(driver, mode,’c;\tp7\bgi’);
Line(100,150,250,150);
Readln;
Closegraph;
У End.
Сиқырлы сурет
50 100 150 200250300350 400 450500550 600 640
О Х
100
150
200
250
300
350
400
440
480

Жоғарыда көрсетілген нүктелердің
қосылуы бойынша графикалық режимде
У сурет салу
Program suret;
Uses graph;
Var driver,mode:integer;
Begin
Driver:=detect; initgraph(driver, mode,’c;\tp7\bgi’);
Setbkcolor(2); Setcolor(9);
Line(75,100,125,50);
Line(152,50,150,75);
Line(150,75,225,75);
Line(225,75,250,50);
Line(250,50,300,100);
Line(300,100,300,175);
Line(300,175,250,225);
Line(250,225,225,175);
Line(225,175,225,300);
Line(225,300,200,325);
Line(200,325,125,325);
Line(125,325,125,300);
Line(125,300,175,300);
Line(175,300,200,275);
Line(200,275,200,200);
Line(175,200,150,175);
Line(150,175,125,225);
Line(125,225,75.175);
Setcolor(6);
Circle(225,125,10);
Circle(150,125,10);
Fillellipse(225,125,10,10);
Fillellipse(150,125,10,10);
Readln;
Closegraph;
End.
Үйге тапсырма

Оқып келуге: Графикалық обьектілер (71-бет)
Тапсырма:(79-80-бет)
Компьютердің экрнанына келесі фигураларды
шығаратын программа құрыңдар:
А) жарты айды;
Б)аққаланы ;
В) автомобильді.

Ұқсас жұмыстар
Растрлық кескін
Технологиялық үрдістерді және өндірістерді компьютерлендіру
Векторлық программалар
“Word мәтіндік редакторына графикалық объектілер көмегімен саяхат жасау”
Qnew - суреттің жаңа файлын жасау
РАСТРЛЫҚ ФОРМАТТАР
Объектілерді белгілеу
Графикалық бейнелерді сақтау форматтары
Деректер түрлері
Векторлы графика программалары
Пәндер