1.12 Тема: Копирование и перенос данных. Восстановление данных

1.12.1 Пр19 Подключение справочного файла к приложению

Цель: научиться подключать справочный файл к приложению.

1. Создайте в Visual Basic новый проект типа Standard EXE.

2. Задайте свойству Name формы Form1 значение frmMain, а свойству Caption - значение Приложение со справкой.

3. Щелкните правой кнопкой мыши на строке Project1 в окне проекта и выберите из контекстного меню команду Project1 Properties.

4. В диалоговом окне Project Properties занесите в поле Help File имя справочного файла из предыдущего примера, а затем нажмите кнопку OK.

5. Создайте на форме элемент меню и добавьте следующие пункты и команды:

   ...	...
   Меню Help
   Caption:	&Help
   Name:	mnuHelp
   Команды меню Help
   Caption:	&Contents Files
   Name:	mnuHelpContentsFile
   Caption:	&Topic Files
   Name:	mnuHelpTopicFiles
   Caption:	&Project Files
   Name:	mnuHelpProject

6. Когда меню будут закончены, закройте редактор кнопкой OK.

7. Включите в проект элемент стандартного диалогового окна. Задайте его свойству Name значение dlgHelp. Этото элеамент будет использоваться для вызова справочного файла.

8. Откройте окно программы и добавьте в процедуру события mnuFileExit_Click() оператор End.

9. Добавьте в процедуру события Form_Load() следующую строку: dlgHelp.HelpFile = App.HelpFile

10. Добавьте следующий фрагмент в процедуру события mnuHelpContentsFile_Click():

Private Sub mnuHelpContentsFile_Click()dlgHelp.HelpContext = "100"

dlgHelp.HelpCommand = cdlHelpContext

dlgHelp.ShowHelp

End Sub

11. Добавьте следующий фрагмент в процедуру события mnuHelpTopicFiles_Click():

Private Sub mnuHelpContentsFile_Click()

dlgHelp.HelpContext = "400"

dlgHelp.HelpCommand = cdlHelpContext

dlgHelp.ShowHelp

End Sub

12. Добавьте следующий фрагмент в процедуру события mnuHelpTopicFiles_Click():

Private Sub mnuHelpProject_Click()

dlgHelp.HelpContext = "700"

dlgHelp.HelpCommand = cdlHelpContext dlgHelp.ShowHelp

End Sub

13. Сохраните и запустите программу.

1.13 Тема: Копирование клиентской части приложения бд

1.13.1 Пр20 Создание дистрибутива приложения

Цель: научиться создавать дистрибутив приложения.

Для наглядности предположим, что надо создать дистрибутивы двух различных приложении:

• калькулятора, поставляемого с Visual Basic;

• элемента управления числового поля ввода NumericTextBox.

Создание дистрибутива для проекта калькулятора

Рисунок 23-3. Страница Compile.

Начнем с простого проекта калькулятора, который можно найти в подкаталоге \samples\PGuide\calc каталога VB. Сначала придется скомпилировать этот проект, так как он не поставляется в исполняемой форме. Итак, загрузим VB и затем скомпилируем проект Calc.vbp. После этого введем имя и путь к файлу Calc.vbp и щелкнем на кнопке Next (которая сейчас доступна). После некоторого промежутка времени, необходимого для обработки файлов, перейдем к экрану шага 3 мастера установки.

Рисунок 23-4. Начальный экран мастера установки.

В этом экране надо сообщить мастеру, где сохранять дистрибутив. Например, выберем гибкие диски. Для этого щелкнем на опции Floppy Disk. Щелкнем по кнопке Next и попадем на экран, где сообщим мастеру о типе используемых дискет.

Щелкнем по кнопке Next. Получающийся экран, используется только для серверов ActiveX - это более сложная тема, которую мы не рассматривали в этой книге. Щелкнем по кнопке Next, чтобы пропустить этот экран.

После небольшой задержки появится экран File Summary. Если выбрать любой из этих файлов и щелкнуть по кнопке File Details, мастер выведет на экран диалоговую панель. Она содержит подробную информацию о выбранном файле. Если щелкнуть на Summary Details в экране File Summary, увидим диалоговую панель с информацией.

Щелкнем по кнопке Next, при нахождении в экране FileSummary и перейдем к экрану Finished.

Если сейчас щелкнуть по кнопке Finished, мастер начнет выводить информационные панели с сообщениями о выполняемых им действиях (сжатие файлов, вычисление файлов, которые необходимо скопировать, и так далее). Когда это будет выполнено, на экране появится информационная панель, похожая на ту, что приведена справа. Она попросит вставить первый (из двух в данном случае) дисков.

Запустим мастер. Необходимо заметить, что мы хотим создать дистрибутив элемента управления таким образом, чтобы он мог быть загружен из Internet или в интрасеть. После принятия решения сделать Interenet-установку щелкнем по кнопке Next и перейдем к следующему экрану.

Щелкнем по кнопке Next. Появится следующий экран. Microsoft предоставляет опцию, которая позволяет пользователю загружать только определенные стандартные файлы, как, например, огромный файл виртуальной машины Visual Basic, необходимый для элемента управления, прямо с сайта Microsoft при первом использовании элемента управления в Internet Explorer. Это действительно очень полезная опция, так как если пользователи уже имеют какие-либо из необходимых файлов на своей машине, то Internet Explorer достаточно разумен для того, чтобы не загружать их заново.

61