Статья: Размещение картинки в программе
Запустите приложение. Заставьте автомобиль исчезнуть за пределами окна Вашего приложения. Щелкните по свободному полю окна – автомобиль немедленно займет стартовую позицию. Подумайте, как это осуществляет строка в процедуре Form_Click, которая обрабатывается при одиночном щелчке указателем мыши на форму. Вновь приведите автомобиль в движение и верните его в исходное состояние. Закройте приложение. Сохраните проект Вашей программы в папке Lesson12. Создайте исполняемый файл и сохраните его в той же папке. Приложение готово. На следующем уроке Вы озвучите это приложение.
Для вызова окна проекта в меню Window (Окно) выполните команду Project (Проект). В этом окне Вы получите сведения о составе проекта приложения, а при необходимости с помощью кнопок «View Form» (Просмотр формы) и «View Code» (Просмотр программного кода) можете вызвать на экран форму приложения и ее программный код.
Рассмотрим еще один анимационный прием – масштабирование изображения. Для виндовских «резиновых» метафайлов с расширением WMF (Электронные картинки) можно использовать объект Picture (Рисунок) или объект Image (Образ), а для файлов точечных рисунков с расширением BMP масштабирование возможно лишь посредством объекта Image (Образ).
Создайте папку Lesson13 для Вашего следующего приложения. Запустите Visual Basic. В окне свойств формы Form1 выберите свойство BackColor (Цвет формы) и установите для него значение цвета – серый. Для этого щелкните два раза по свойству BackColor и в появившемся окне палитры цветов выберите серый цвет.
Для размещения объекта Image1 (Образ) на форме приложения щелкните по значку объектов типа Image (Образ) в окне объектов. Затем нажмите мышкой на поле Вашей формы и, не отпуская кнопки, переместите указатель в произвольном направлении по диагонали. Отпустите мышку. В окне свойства объекта выберите свойство Stretch (Изменение размера) и установите для него значение True (Истина). Здесь же выберите свойство Picture (Рисунок) и щелкните по нему два раза. Через появившееся окно загрузите рисунок из файла 02.bmp в форму Form1.
В окне объектов щелкните по значку «Командная кнопка», затем установите электронную командную кнопку Command1 на форму и подберите подходящие для нее размеры. Данные операции похожи на действия над объектами Picture (Рисунок) и Image (Образ). Щелкните указателем мыши по вновь созданному объекту два раза и в процедуру Command1_Click впишите программные утверждения:
Image1.Width = Image1.Width * 1.25 ‘ увеличение ширины
Image1.Height = Image1.Height * 1.25 ‘ увеличение высоты
Первая строка при одиночном щелчке по командной кнопке увеличит значение свойства Width (Ширина) объекта Image1 в 1,25 раза. Вторая строка сработает таким же образом для свойства Height (Высота). В результате размеры изображения увеличатся на 25%.
В окне свойств объекта Command1 выберите свойство Caption (Заголовок) и придайте ему значение «Увеличить», а свойству FontBold (Жирный шрифт) значение False (Ложь). Аналогичным образом создайте еще две командные кнопки: «Уменьшить» и «Выход». Для кнопки Command2 в процедуру Command2_Click впишите строки, которые будут уменьшать размеры фотографии на 25%:
Image1.Width = Image1.Width / 1.25 ‘ уменьшение ширины
Image1.Height = Image1.Height / 1.25 ‘ уменьшение высоты
Для кнопки Command3 в процедуру Command3_Click запишите программное утверждение:
End ‘ завершение работы приложения
Это утверждение при одиночном щелчке по командной кнопке «Выход» будет завершать работу Вашего приложения.
Запустите программу. Поочередно, по несколько раз понажимайте на кнопки «Увеличить» и «Уменьшить», наблюдая за изменением размеров фотографии. Для окончания работы приложения щелкните по созданной Вами электронной кнопке «Выход». Сохраните проект приложения и создайте для него исполняемый EXE-файл. Проверьте этот файл в работе.
Домашнее задание
1. Изготовьте приложение, в котором мяч будет подпрыгивать вверх и затем возвращаться обратно при нажатии на электронную кнопку.
2. Создайте приложение, в котором какой-либо рисунок будет уменьшаться в размерах при нажатии на него указателем мыши и увеличиваться при нажатии на свободное от этого рисунка поле окна формы.
3. У объекта Form1 (Форма) самостоятельно исследуйте его свойство BorderStyle (Граничный стиль), которое может принимать четыре значения от 0 до 3.
Подготовка приложения для установки на другом компьютере
Создайте папку с произвольным названием, используя только латинские буквы и цифры. Скопируйте в эту папку созданный Вами ЕХЕ-файл и библиотеку динамических связей Vbrun300.dll. Если Ваше приложение содержит элементы мультимедиа (звук, музыка, видео, анимация), то в эту же папку необходимо скопировать файл Mci.vbx и мультимедийные файлы с расширениями WAV, MID, RMI, AVI, которые Вы задействовали в программе. Если приложение использует окно общего диалога, необходим будет файл Cmdialog.vbx. Помните, что файлы рисунков с расширениями BMP и WMF копировать не надо, так как Visual Basic в процессе компиляции автоматически помещает их в исполняемый EXE-файл. Если объем папки по размеру окажется больше емкости дискеты, то воспользуйтесь каким-либо архиватором, например WinRAR. Этот архиватор позволит Вам сжать приложение, при необходимости разбить архив на дискеты, а при желании файл архива можно сделать саморазворачивающимся.
Сохранение исходных текстов Ваших программ
Все исходные тексты программ Ваших приложений для Windows необходимо самым тщательным образом сохранять. Они могут понадобиться Вам в тех случаях, если появится желание изменить что-либо в ранее написанном приложении или Вы захотите использовать части этого приложения в своих новых работах. Кроме того, дискета с исходными текстами программ станет своеобразной копилкой Ваших знаний в Visual Basic. Придет время, когда понадобится освежить в памяти Ваши прежние достижения и тогда не нужно будет начинать все сначала. Для сохранения текстов программ достаточно скопировать на надежный носитель файл проекта Вашего приложения с расширением MAK и файлы форм этого приложения с расширением FRM. Если проект приложения содержит файлы модулей с расширением BAS, то их тоже нужно будет скопировать. При сохранении приложений создавайте отдельную папку для каждого из них. Если Ваше приложение является мультимедийным, то задействованные в нем файлы музыки, видео, звуков поместите в эту же папку.