Управляющие элементы Image List и Tool Bar
Image List используется для размещения группы изображений в одном месте. Эти изображения могут использоваться в любой части приложения, хотя обычно элемент используют для хранения изображений для панелей инструментов, поэтому мы будем его рассматривать с элементом Tool Bar (панель инструментов). В общем, если в Вашем приложении будут использоваться картинки или наборы картинок, то удобнее всего их разместить в элементе Image List, а потом программно вызывать по мере надобности. Ссылаться на изображения можно с помощью индекса, например:
Picture1.Picture = ImageList1.ListImages(1).Picture
Последнее слово Picture указывает, что здесь картинка (если не поставить, возникнет ошибка несоответствия типов). Нумерация в коллекции List Image начинается с первого номера!
Задание:
Откройте новый проект
Поместите элемент ImageList на форму.
Правой кнопкой мыши откройте меню – свойства элемента.
General:
Custom
Images:
Insert Picture – вставляете нужное количество картинок
Добавьте в форму элемент ToolBar
Правой кнопкой мыши откройте меню – свойства элемента.
General:
Image List – ImageList1
Style – tbrFlat (приподнимающиеся кнопки)
Buttons:
Index – 1
Image – 1 (соответствие в наборе ImageList)
Insert Buttons
I
Image – 2
И так далее…
Запустите проект – должно быть примерно такое
Свойство Style задает способ вывода кнопки на экран:
Default – обычная нажимаемая кнопка
Check – кнопка проверки (нажимается и остаётся. Отжать – повторный щелчок)
Button Group – кнопка принадлежит группе. Данная кнопка не может быть нажата до тех пор, пока нажата другая кнопка группы. В одно и то же время только одна кнопка группы может быть нажата.
Separator - разделитель
PlaceHolder – разделитель с переменной шириной.
DropDown – ниспадающее меню для кнопки (как ComboBox)
Обрабатывать события нажатия кнопок можно в помощью Button.Index:
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
Select Case Button.Index
Case 1
MsgBox "Новая"
Case 2
MsgBox "Открыть"
Case 3
MsgBox "Сохранить"
Case 4
MsgBox "Вырезать"
Case 5
MsgBox "Копировать"
Case 6
MsgBox "Вставить"
End Select
End Sub
Создание дистрибутивного пакета – подготовка приложения к распространению
Пуск – Программы – Microsoft Visual Basic 5.0 – Application Setup Wizard
Кнопка Browse – выбрать проект Редактор.vbp
Next
Выберите, каким образом хотите сохранить установочный пакет – либо прямо на дискеты (Floppy Disk), либо в одну папку (Single Directory), либо разбить по дисковым директориям (Disk Directory (\Disk1, \Disk2, …)). Мы выбрали Single Directory.
Next
VB предложит сохранить в папку SWSETUP. Добавьте ниже еще одну папку Редактор:
C:\WINDOWS\TEMP\SWSETUP\Редактор\
Next и подтвердите создание новой папки Редактор
Next
Next //смотри примечание
Next
Finish
Найдите свой дистрибутивный пакет – он занимает чуть больше полутора мегабайт.
Если запустить Setup.exe, то созданный Вами текстовый редактор инсталлируется на Ваш компьютер.
Примечание:
В этом месте, если нажать кнопку Add…, то в проект можно добавить любые файлы. Например, проект «Редактор». Вам нужно, чтобы с Вашим редактором к комплекте было несколько текстовых файлов для работы. Здесь вы их можете добавить. Впоследствии при установке в папке Program Files будет создана папка «Редактор». В нее будут помещены исполняемая программа, некоторые файлы и Ваши добавленные файлы.
Путь к этим файлам «C:\Program Files\Редактор\*.txt»
Имейте этот путь в виду при разработке проекта!