№8 Laboratoriyaliq jumis
Tema: C++ Builder ortalıǵı, Win32 komponentalar bólimi TrackBar, ProgressBar komponentaları hám System komponentalar bólimi Timer komponentası. (6 caat)
Jumıstıń maqseti: C++ Builder ortalıǵında Win32 komponentalar bólimindegi TrackBar, ProgressBar komponentaları hám System komponentalar bólimindegi Timer komponentasınan paydalanıp baǵdarlamalar dúziwdi úyreniw.
Máseleniń qoyılıwı: Tómendegi kestede kórsetilgen tapsırmalardıń baǵdarlamasın C++ Builder ortalıǵında dúzip shıǵıń hám nátiyjesin alıń.
Metodikalıq kórsetpe:
TrackBar komponentası. TrackBar komponentası protsesstiń orınlanıw dárejesin kórsetiw ushın isletiledi. Komponentanıń bazı qásiyetlerin kórip shıǵamız:
Max – komponenta kórsetkishiniń maksimal mánisin bildiredi;
Min – komponenta kórsetkishiniń minimal mánisin bildiredi;
Orientation – komponentanıń gorizontal yamasa vertikal jaǵdayda bolıwın támiynleydi;
Position – komponenta kórsetkishiniń qay jerde ekenligin kórsetip turadı;
ProgressBar komponentası. ProgressBar komponentası protsesstiń orınlanıw dárejesin kórsetiw ushın isletiledi. Komponentanıń bazı qásiyetlerin kórip shıǵamız:
Max, Min, Orientation hám Position qásiyetleri TrackBar komponentasındaǵı kibi wazıypalardı atqaradı.
Smooth – protsesstiń orınlanıwın bólek-bólek yamasa úzliksiz jaǵdayda kórsetiwin támiynleydi.
Timer komponentası. Timer komponentası programma islewi dawamında waqıyalar izbe-izligin jaratıw ushın isletiledi. Komponentanıń bazı qásiyetlerin kórip shıǵamız:
Interval – waqıyalar jaratılıw dáwirin belgilep beredi. Millisekundlarda beriledi.
Enabled – Timer komponentasınıń islewi ushın ruxsat beriwdi yamasa ruxsat bermeslikti támiynleydi.
Mısalı: Bir neshe figuralardan birewin sızıwshı, onıń reńlerge boyalıwın TrackBar hámde boyalıw stiliniń ózgeriwin ProgressBar komponentaları arqalı beriwshi baǵdarlama dúzilsin.
Baǵdarlama dúziw izbe-izligi:
Baǵdarlamanıń interfeysin tómendegi súwrette kórsetilgendey etip jaratamız.
Bunıń ushın:
Forma konstruktorı Caption qásiyetin 8-laboratoriya jumisi qılıp ózgertemiz;
Formaǵa RadioGroup1 komponentasın ornatıp onıń Caption qásiyetin Figuralardan birewin saylan: qılıp ózgertemiz;
RadioGroup1 komponentası Items qásiyetine kirip Sheńber, Dóńgeleklengen tótrmúyeshlik, Ellips elementlerin jaratamız;
RadioGroup1 komponentası ItemIndex qásiyetin 0 qılıp ózgertiremiz;
Formaǵa Win32 komponentalar bóliminen TrackBar1 komponentasın ornatamız;
TrackBar1 komponentası Height qásiyetin 30, Width qásiyetin 300, Max qásiyetin 100 qılıp ózgertemiz;
Label1 (Jasıl), Label2 (Qızıl) hám Label3 (Sarı) komponentaların ornatamız;
Button1 (Start) hám Button2 (Stop) komponentaların ornatamız;
ProgressBar1 komponentası Height qásiyetin 20, Width qásiyetin 300, Max qásiyetin 100, Smooth qásiyetin true qılıp ózgertemiz;
Label4 (Gorizontal), Label5 (Vertikal) hám Label6 (Tolıq) komponentaların ornatamız;
Button3 (Start) hám Button4 (Stop) komponentaların ornatamız;
Formaǵa System komponentalar bóliminen Timer1 hám Timer2 komponentaların ornatamız hámde ekewiniń de Enabled qásiyetin false qılıp ózgertemiz;
Formaǵa Additional komponentalar bóliminen Shape1 komponentasın ornatamız;
Shape1 komponentası Height qásiyetin 250, Width qásiyetin 150 qılıp ózgertemiz;
Shape1 komponentası Shape qásiyetin stCircle qılıp ózgertiremiz;
Button5 (Shiǵiw) komponentasın ornatamız;
Komponentalardın barlıǵında shrift Arial, ólshemi 12, jazılıw stili Jirnıy hámde reńi Temnosiniy;
Komponentalardı súwrettegidey etip tegisleymiz.
Baǵdarlama kodın jazıw ushın tómendegi izbe-izlik orınlanadı:
RadioGroup1 komponentası ústine 2 márte basıp ashılǵan kodlar aynasına tómendegi kodlardı jazamız:
//RadioGroup1 din ItemIndex neshe bolsa sogan qarap sizamiz
if(RadioGroup1 -> ItemIndex == 0)
Shape1 -> Shape = stCircle;
if(RadioGroup1 -> ItemIndex == 1)
Shape1 -> Shape = stRoundRect;
if(RadioGroup1 -> ItemIndex == 2)
Shape1 -> Shape = stEllipse;
Timer1 komponentası ústine 2 márte basıp ashılǵan kodlar aynasına tómendegi kodlardı jazamız:
//TrackBar1 din Position qasiyeti 0 de bolsa Jasılǵa boyaymiz
if(TrackBar1 -> Position == 0)
Shape1 -> Brush -> Color = clGreen;
//TrackBar1 din Position qasiyetin har 1000 ms ta 10 ga asiramiz
TrackBar1 -> Position += 10;
//TrackBar1 din Position qasiyeti 50 de bolsa Qızılǵa boyaymiz
if(TrackBar1 -> Position == 50)
Shape1 -> Brush -> Color = clRed;
//TrackBar1 din Position qasiyeti 100 de bolsa Sarıǵa boyaymiz
if(TrackBar1 -> Position == 100)
Shape1 -> Brush -> Color = clYellow;
Button1 (Start) komponentası ústine 2 márte basıp ashılǵan kodlar aynasına tómendegi kodlardı jazamız:
//Timer1 di aktiv jaǵdayǵa ótkeremiz
Timer1 -> Enabled = true;
Button2 (Stop) komponentası ústine 2 márte basıp ashılǵan kodlar aynasına tómendegi kodlardı jazamız:
// Timer1 di passiv jaǵdayǵa ótkeremiz
Timer1 -> Enabled = false;
Timer2 komponentası ústine 2 márte basıp ashılǵan kodlar aynasına tómendegi kodlardı jazamız:
//ProgressBar1 din Position qasiyeti 0 de bolsa Gorizontal boyaymiz
if(ProgressBar1 -> Position == 0)
Shape1 -> Brush -> Style = bsHorizontal;
//ProgressBar1 din Position qasiyetin har 1000 ms ta 10 ga asiramiz
ProgressBar1 -> Position += 10;
//ProgressBar1 din Position qasiyeti 50 de bolsa Vertikal boyaymiz
if(ProgressBar1 -> Position == 50)
Shape1 -> Brush -> Style = bsVertical;
//ProgressBar1 din Position qasiyeti 100 de bolsa Tolıq boyaymiz
if(ProgressBar1 -> Position == 100)
Shape1 -> Brush -> Style = bsSolid;
Button3 (Start) komponentası ústine 2 márte basıp ashılǵan kodlar aynasına tómendegi kodlardı jazamız:
//Timer2 ni aktiv jaǵdayǵa ótkeremiz
Timer2 -> Enabled = true;
Button4 (Stop) komponentası ústine 2 márte basıp ashılǵan kodlar aynasına tómendegi kodlardı jazamız:
// Timer2 ni passiv jaǵdayǵa ótkeremiz
Timer2 -> Enabled = false;
Button5 (Shiǵiw) komponentası ústine 2 márte basıp ashılǵan kodlar aynasına tómendegi kodlardı jazamız:
//Aktiv aynani jabamiz
Close();
Nátiyje:
Tapsırma variantları:
№ |
Máseleniń shárti |
1. |
Sheńber hám ellipsten birewin sızıwshı, onıń reńlerge (qızıl, sarı, kók) boyalıwın ProgressBar hámde boyalıw stiliniń (gorizontal, vertikal, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
2. |
Sheńber hám tórtmúyeshlikten birewin sızıwshı, onıń reńlerge (qızıl, sarı, jasıl) boyalıwın ProgressBar hámde boyalıw stiliniń (gorizontal, kesilisiwshi, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
3. |
Sheńber hám dóńgeleklengen tórtmúyeshlikten birewin sızıwshı, onıń reńlerge (qızıl, sarı, sur) boyalıwın ProgressBar hámde boyalıw stiliniń (gorizontal, diagonal kesilisiwshi, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
4. |
Sheńber hám dóńgeleklengen kvadrattan birewin sızıwshı, onıń reńlerge (qızıl, sarı, gúmis reń) boyalıwın ProgressBar hámde boyalıw stiliniń (gorizontal, diagonal, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
5. |
Sheńber hám kvadrattan birewin sızıwshı, onıń reńlerge (qızıl, kók, jasıl) boyalıwın ProgressBar hámde boyalıw stiliniń (vertikal, kesilisiwshi, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
6. |
Ellips hám tórtmúyeshlikten birewin sızıwshı, onıń reńlerge (qızıl, kók, sur) boyalıwın ProgressBar hámde boyalıw stiliniń (vertikal, diagonal kesilisiwshi, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
7. |
Ellips hám dóńgeleklengen tórtmúyeshlikten birewin sızıwshı, onıń reńlerge (qızıl, kók, gúmis reń) boyalıwın ProgressBar hámde boyalıw stiliniń (vertikal, diagonal, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
8. |
Ellips hám dóńgeleklengen kvadrattan birewin sızıwshı, onıń reńlerge (qızıl, jasıl, sur) boyalıwın ProgressBar hámde boyalıw stiliniń (kesilisiwshi, diagonal kesilisiwshi, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
9. |
Ellips hám kvadrattan birewin sızıwshı, onıń reńlerge (qızıl, jasıl, gúmis reń) boyalıwın ProgressBar hámde boyalıw stiliniń (kesilisiwshi, diagonal, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
10. |
Tórtmúyeshlik hám dóńgeleklengen tórtmúyeshlikten birewin sızıwshı, onıń reńlerge (qızıl, sur, gúmis reń) boyalıwın ProgressBar hámde boyalıw stiliniń (diagonal kesilisiwshi, diagonal, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
11. |
Tórtmúyeshlik hám dóńgeleklengen kvadrattan birewin sızıwshı, onıń reńlerge (sarı, kók, jasıl) boyalıwın ProgressBar hámde boyalıw stiliniń (gorizontal, vertikal, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
12. |
Tórtmúyeshlik hám kvadrattan birewin sızıwshı, onıń reńlerge (sarı, kók, sur) boyalıwın ProgressBar hámde boyalıw stiliniń (gorizontal, kesilisiwshi, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
13. |
Dóńgeleklengen tórtmúyeshlik hám dóńgeleklengen kvadrattan birewin sızıwshı, onıń reńlerge (sarı, kók, gúmis reń) boyalıwın ProgressBar hámde boyalıw stiliniń (gorizontal, diagonal kesilisiwshi, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
14. |
Dóńgeleklengen tórtmúyeshlik hám kvadrattan birewin sızıwshı, onıń reńlerge (sarı, jasıl, sur) boyalıwın ProgressBar hámde boyalıw stiliniń (gorizontal, diagonal, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |
15. |
Dóńgeleklengen kvadrat hám kvadrattan birewin sızıwshı, onıń reńlerge (sarı, jasıl, gúmis reń) boyalıwın ProgressBar hámde boyalıw stiliniń (vertikal, kesilisiwshi, tolıq) ózgeriwin TrackBar komponentaları arqalı beriwshi baǵdarlama dúzilsin |