![]() |
Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | |
|
|
1. В графическом редакторе Paint создайте четыре рисунка «зима», «весна, «лето», «осень» и сохраните рисунки в отдельных файлах на диске С:
2. Откройте новый проект, установите следующие объекты и измените им свойства
| Объект | Свойство | Значение |
| Форма | Name | frmPaint |
| WindowState | 2-Maximized | |
| Метка | Name | LblResult |
| Caption | ||
| Полоса прокрутки | Name | HsbSet |
| Max | ||
| Min | ||
| Командные кнопки | Name | CmdWinter |
| Caption | Зима | |
| Name | CmdSpring | |
| Caption | Весна | |
| Name | CmdSummer | |
| Caption | Лето | |
| Name | CmdAutumn | |
| Caption | Осень | |
| Name | cmdExit | |
| Caption | Выход |
3. Приведите свою форму в соответствие с образцом
4.
![]() |
lblResult.Caption = Str(hsbSet.Value)
frmPaint.BackColor = QBColor(hsbSet.Value)
5. Такой же код набрать для обработки события Scroll для объекта HsbSet.
6. В окне кода процедуры обработки события Click набрать для объекта cmdExit
MsgBox “До свидания”,0,”Выход”
End
7. В окне кода процедуры обработки события Click набрать для объекта cmdWinter
frmPaint.Picture = LoadPicture("c:\Мои Документы\зима.bmp")
8. Самостоятельно набрать для других командных кнопок. Проверьте работу программы
Дата публикования: 2015-02-22; Прочитано: 276 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!
