Работа
с элементом управления CommonDialog
Запуск WinHelp32.exe
С помощью эл.
управления CommonDialog Вы
можете отобразить свой файл
справки Help. Для этого
неоходимо свойство CommonDialog1.Action
установить в 6 или же
применить метод ShowHelp. Но,
прежде чем перед Вами появится
файл справки Help необходимо
назначить ряд свойств.
1.Установить
значение свойства HelpCommand
одной из констант приведенной
в таблице
Константы
|
Значения
|
Описание
|
cdlHelpContext |
&H1
|
Отображение Help
для специальной темы |
cdlHelpQuit |
&H2 |
Сообщение
программе Help, что
определенный справочный
файл - больше не используется |
cdlHelpIndex |
&H3
|
Отображает индекс
определенного Help файла |
cdlHelpContents |
&H3 |
Отображает тему
содержания в текущем Help
файле |
cdlHelpHelpOnHelp |
&H4 |
Отображает Help
для использования
непосредственной
прикладной программы Help |
cdlHelpSetIndex |
&H5 |
Устанавливает
текущий индекс для
многоиндексного Help |
cdlHelpSetContents |
&H5 |
Обозначает
специфическую тему как
тему содержания |
cdlHelpContextPopup |
&H8 |
Отображает тему,
идентифицированную
контекстным номером |
cdlHelpForceFile |
&H9 |
Создает Help
файл, который отображает
текст в только одном
шрифте |
cdlHelpKey |
&H101 |
Отображает Help для
специфического ключевого
слова |
dlHelpCommandHelp |
&H102 |
Отображает Help
для специфической команды |
cdlHelpPartialKey |
&H105
|
Вызывает поиск в
Справке Windosw |
2.Установить
значение свойства HelpFile, т.е.
указать путь к Вашему файлу Help.
3.И
наконец, вызываем сам Help.
CommonDialog1.Action = 6 или
же CommonDialog1.ShowHelp
Теперь
скомпануем все вышеописанное в
упорядоченный код:
Private Sub mnuWinHelp_Click()
On
Error GoTo
ErrorHandler
With CommonDialog1
.CancelError = True
.HelpCommand = cdlHelpHelpOnHelp
.HelpFile = "C:\Windows"
.Action = 6
End
With
Exit
Sub
ErrorHandler:
If Err.Number = 32755 Then
Exit Sub
End
If
End Sub
|