Зертханалық жұмыс №10 «Бейнелерді құру»

Зертханалық жұмыс №10 «Бейнелерді құру»

1. 
   К елесі түрдегі Y=F(x) функциясының графигін тұрғызыңыздар:
   

50≤x<100 Y=x-50

100≤x<150 Y=50

150≤x<200 Y=-(x-200)

200≤x<250 Y=0

Барлық өлшемдері пиксельмен берілген.

Пішінге график тұрғызу үшін Image құрауышын орналастырыңыз. Пішінге екі батырманы орналастырыңыз «Операция» және «Закрыть». «Операция» батырмасына басқанда график тұрғызылады.

2. 
   Rectangle әдісін қолданып, оған қажетті координаталарды бере отырып, тіктөртбұрыш сызыңыздар.Төмендегі қасиеттерді орнатыңыз:
   

3. 
   RadioGroup құрауышын және TCanvas класының негізгі әдістерін қолдана отырып, геометриялық фигураларды сызатын қосымша құрыңыз (шеңбер, элиипс, бұрыштары дөңгелектенген тіктөртбұрыш, бұрыштары дөңгелектенген квадрат, квадрат және т.б.).
   
4. 
   А лдыңғы тапсырманың бағдарламасын өзгертіңіз, геометриялық фигураны салу үшін Additional парағының Shape құрауышын қолданыңыз.
   

Samples парағының ColorGrid құрауышын қолдана отырып, геометриялық фигураның түрін өзгертіңіз.

Shape1.Brush.Color:=
ColorGrid1.ForeGroundColor;

5. 
   Пішіннің канвасында сурет салуға мысал:
   

Келесі оқиғаларға реакцияны өңдейтін процедурураларды жазыңыздар: