Поможем написать учебную работу
Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
ертханалык жумыс №6
№ 6 Зертханалық жұмыс . ToolBar құрылғы панелін құру, StatusBar жағдайлар жолы, TrackBar, ProgressBar компоненттерін қолдану.
Мақсаты ToolBar құрылғы панелін құру, StatusBar жағдайлар жолы, TrackBar, ProgressBar компоненттерін қолданудың негізгі әдістерімен танысу.
Тапсырма ауысу коэфициенттерімен квадрат теңдеуін шешу, конус көлемін есептеу. Мәзір командасын және мәзір командасына байланысқан құрылғылар панелі батырмасын құру. Осы жолда уақытпен күнді көрсету.
Құрылғылар панелі бұл арнайы контейнер. Құрылғылар панельінде батырмалар, ауысып қосқыштар, комбинирленген тізім орналасуы мүмкін. Құрылғылар панельін құру үшін Win32 палитра компоненттерінің бетінде орналасқан ToolBar компоненті қолданылады. Панельде орналасқан негізгі элемент ретінде TtoolButton батырмасын аламыз, жаңа батырмалар құрылғылар панелінің контекстті мәзірінде New Button компоненті көмегімен қосылады. Батырмаға суреттер ImageList компоненті көмегімен қосылады. Коллекция қалыптасады ма? Одан кейін коллекция аты инструменттер панелінде Image қасиетіне меншіктеледі, ал ImageIndex қасиетіне суреттердің біреуінің индексі меншіктеледі.
Жағдай жолы Win32 бетінде орналасқан StatusBar компонентін көрсетеді. Жағдай жолы қосымша ақпарат шығаруға арналған, мысалы ағымдағы күні, ағымдағы уақыты және т.с.с. Ол бірнеше жеке панелдерге бөлінуі мүмкін. Ол үшін келесі әрекеттерді орындау керек. Екі рет жағдай жолына тышқанмен шертеміз және Add New батырмасының көмегімен керекті панелдер санын қосамыз. Text қасиеті панелдегі мәтінді көрсетеді. Нақты панелге оның индексі бойынша қатынауға болады: Panels[i];
Программаны өңдеудің жобасы
6.1 сурет
statusbar1.Panels[0].Text:=datetostr(now);
statusbar1.Panels[1].Text:=timetostr(now);
6 . Компонент орналастыру.
Жобаны сақтап және оны орндалуға жібереміз:
6.2.сурет
PAGE 2