|
Енді мына команданың Image1.Visible:=RadioButton1.Checked; мағынасыны түсінікті болады - RadioButton1 компонент таңдап алынған болса, онда оның Checked қасиетінің мәні true –ға тең болады, яғни Image суретті көрсету қажет. Онда RadioButton2 компонент таңдап алынған жоқ. Демек, оның Checked қасиетінің мәні false –ке тең болады. RichEdit1.Visible:=RadioButton2.Checked; команда орындалған кезде RichEdit1 компонент көрсетілмей, жасырылынып қойылады.
Программаны орындауға жіберу үшін 18 суретте көрсетілген сәйкес жазуы бар батырманы басу керек. Онда 19 суретте көрсетілген терезе ашылады. Бұл терезеде программа арқылы ұйымдастырылған сұхбатта сандарды енгізіп, есептің нәтижесін осы жерден көруге болады.
19 сурет. Программа орындалу барысында
 - бұл батырманың программалық коды мынадай болды:
procedure TForm13.Button2Click(Sender: TObject);
begin
winexec('C:\Dip_Ci\Progr\Циклы\Ex\Ex_for_2.exe',1);
end;
Қайталау операторлар мысалдар терезесінде факториал есебінің шешімін көру үшін “Мысал4” ярлыгіне шертіп, 20-суретте көрсетілген терезеге көшеміз. Бұл терезе жоғарыдаға мысалдар терезелері сияқты ұйымдастырылған. Бұл беттің үстіне 2 Label, RichEdit және Button компоненттері қойылған. Label компоненттер арқылы 4-ші мысал бетіне екі жазу шығарылған – “Шешімі. Параметрі бар цикл арқылы”, “N!-ды есептеңіз.”
20 сурет. Факториал есептеуін көрсететін мысал терезесі
“Программаны орындауға жіберу” батырманы шерткен кезде мысал программасы орындалуға жіберіледі. Программаның жұмыс істеуі 21 суретте көрсетіліп тұр.
21 сурет. Факториал есептеу программасының жұмыс істеу барысында
Электрондық оқулық мазмұнының келесі пункті – “Массивтермен жұмыс істеу”. Бұл тақырыптың терезесінің жұмыс істеуі жоғарыда айтылып шыққан терезелер жұмысына ұқсас. “Массивтермен жұмыс істеу” терезеден мысалдар терезесін шақыруға болады. Ол терезенің суреті төменде көрсетіліп тұр (22 сурет).
22 сурет. Массивтермен жұмыс істеуіне мысалдар терезесі.
Бұл терезенің ұйымдастырыу жоғарыда көрсетілген 17 суретте көрсетілген терезенің ұйымдастырыуна ұқсас. 22 суретте екі векторды қосатын программаның мысалы көрсетілген. Оның программасын орындалуға жіберген кезде 23-ші суретте көрсетілген терезе ашылады. Екі массивтердің элементтерін енгізіп, нәтижені осы терезеден көріп алуға болады.
23 сурет. Екі вектордың элементтерін қосатын программасы жұмыс істеп тұрған кезде
Мазмұнның басқа тарауларын жоғарыда көрсетілген жолдарымен құрып аламыз.
24 сурет. “Графикамен жұмыс істеу” терезесі
“Графикамен жұмыс істеу” тақырыбына арналған терезенің түрін 24 суреттен көруге болады. Бұл терезені ұйымдастыру үшін форманың үстіне RichEdit, GroupBox, RadioButton және Button батырмалары қойылып шыққан. “Мысалдар” батырмасын шертіп 25 суреттегі терезені ашамыз.
 25 сурет. Графикамен жұмыс істеу мысалдар терезесі
Бұл терезеде 7 мысалдардың мазмұндары мен 7 батырмалары орнатылып қойылған. Әр батырманың қасында мысалдың мазмұны тұр. Батырманы шертіп, мысал программасын орындауға жібереді. Мысалдардың программалары алдыңғы терезеде жазылған. 24 суретте көрсетілген «Графикамен жұмыс істеу» тақырыбына арналған терезесінде «Фигуралар салу программалар» радиобатырмасын көруге болады. Программаның жұмыс істеу барысында сол радиобатырманы шертіп, текстік редактор терезесінен осы мысалдардың программаларын көруге болады. Ал графика мысалдар терезесінде «Мысал6» батырманы басып,  функцияға графигін құрылуын көреміз (26 сурет).
26 сурет. функцияға графигі Турбо Си программада құрылып тұр
«Файлдармен жұмыс істеу» тақырыбының терезесі 27 суретте көрсетілген. Бұл терезені құру үшін Button, 6 RadioButtob, RichEdit және GroupBox компоненттері қолданылған.
27 сурет.
Электрондық оқулықтың мазмұнына шағын тексттік редактор қосылып қойылған. “Тексттік редактор” жазуы бар батырманың программалық модулінде мына код жазылған:
procedure TForm1.Button2Click(Sender: TObject);
begin
winexec('textedit.exe',1);
end;
Бұл тексттік редактор өте шағын, көп орын алмайды да және rtf –форматта сақталған мәтіндік файлдармен жұмыс істейді. Электрондық оқулыққа бұл тексттік редакторды қосып отырған мақсатымыз - rtf –форматта сақталған мәтіндік файлдардың ішіндегі қателерді жөндеу және кәдімгі txt файлдармен жұмыс істеу. Бұл редактордың программасын Delphi 6 программалау ортаның мысалдарының арасынан тауып алып, өзіміздің ЭО программасына қосып қойдық. Төменгі суретте тексттік редактор арқылы тесттік программаға енгізілетін сұрақтар теріліп жатқаны көрсетіліп тұр.
28 сурет. Тексттік редакторде тестке енгізілетін сұрақтар тексеріліп жатыр
Тесттік програманы жүктеу (30 сурет) үшін “Бақылау тесті” жазуы бар батырманың программалық модуліне мына командаларды жазамыз:
procedure TForm1.Button12Click(Sender: TObject);
begin
Winexec('TEST1.exe',1);
end;
29 сурет. Тесттік программа жұмыс істеп тұр
Достарыңызбен бөлісу: | 
