Сабақ Пән: «Алгоритмдеу және бағдарламалау негіздері» Тақырыбы: «Мәліметтерді енгізу-шығару. Мәтіндік ақпараттарды кескіндеу және түзету компоненттері. Бір жолдық және көп жолдық редакторлар»
жүктеу/скачать 467 Kb.
|
- Бұл бет үшін навигация:
- 29- сурет. Шешуі : procedure TForm1.BitBtn1Click(Sender: TObject); begin Edit1.Text:=TimeToStr(Time); end;
- Width
- Brush
| 28- сурет.
№2 тапсырма Сәйкес батырмаларды шерткенде экранға ағымдық уақыт, ағымдық дата шығатын және Edit компонентіндегі мәтінді алмастыру буферіне қиятын, көшіретін және қоятын және форманы жабатын код жазыңдар. 29- сурет. Шешуі: procedure TForm1.BitBtn1Click(Sender: TObject); begin Edit1.Text:=TimeToStr(Time); end; procedure TForm1.BitBtn2Click(Sender: TObject); begin Edit2.Text:=DateToStr(Date); end; procedure TForm1.BitBtn3Click(Sender: TObject); begin Edit3.CutToClipboard; end; procedure TForm1.BitBtn4Click(Sender: TObject); begin Edit3.CopyToClipboard; end; procedure TForm1.BitBtn5Click(Sender: TObject); begin Edit3.PasteFromClipboard; end; Shape компонентін шартты түрде графиктік ақпаратты шығару құрылғысына жатқызуға болады. Ол әр түрлі геометриялық фигураларды салу үшін қолданылады. Бұл компоненттің негізгі қасиеті- Shape. Ол төмендегі мәндерді қабылдайды: StCircle- шеңбер StEllipse- эллипс StRectangle-тіктөртбұрыш StRoundRectangle- бұрыштары дөңгеленген тіктөртбұрыш StSquare- квадрат StRoundSquare - бұрыштары дөңгеленген квадрат Мысалы: Shape1.Shape:=StEllipse; Shape2.Shape:=StRectangle; Екінші қасиеті-Pen (қалам). Ол сызық және геометриялық фигура шекарасын сызу үшін қолданылатын қалам атрибутын анықтайды. Оның қасиеттері: Color- сурет салынатын қалам түсі. Width- сызылатын сызықтың пикселмен өлшенген қалыңдығы. Style- сызықтың стилі. Ол төмендегідей мәндер қабылдайды. psSolid- тұтас сызық psDash- штрихталған сызық psDot- пунктир сызық psDashDot- штрих- пунктир сызық psDashDotDot- штрих және екі пунктир сызық psClear- сызық жоқ. Түрі Тұрақты Сызық түрі BsSolid Жай сызық BsHorisontal Горизанталь штрих BsVertical Вертикаль штрих BsBDiagonal Сызықтары алға бағытталған диагональды штрих BsFDiagonal Сызықтары төмен бағытталған диагональды штрих BsCross Торлы штрих BsDiagCross Торлы диагональды штрих BsClear Бөлік боялмайды №3 тапсырма Мысалы: Shape1.Pen.Color:=clRed; Shape1.Pen.Width:=3; Shape1.Pen.Style:=psDash; Shape1.Shape:=stCircle; Нәтижеде сызық қалыңдығы 3-ке тең, сызық стилі штрихталған, қызыл түсті шеңбер сызылады. Shape компонентінің келесі қасиеті- Brush (қылқалам). Ол геометриялық фигураның ішін бояуды жүзеге асырады. Brush қасиетінің өз қасиеттері бар. Color - фигура ішін бояу түсін көрсетеді. Style- бояу стилін анықтайды. Оның мәндері: bsSolid- тұтас бояу bsHorizontal- горизонталь сызықпен бояу bsVertical- вертикаль сызықпен бояу bsFDiagonal, bsBDiagonal- диагонал сызықпен бояу bsCross- тік торлы бояу bsDiagCross- көлденең торлы бояу bsClear- боялмаған. Мысал. Суретте әр түрлі стильмен сызылған және боялған түрлі фигуралар көрсетілген. жүктеу/скачать 467 Kb. Достарыңызбен бөлісу:
|