![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
![]() Как открыть HTML страницу, спомощью нажатия кнопки ? Мне нужно привязать справку (HTML страницу), к приложению. HTMl страница хранится вместе с файлами программы.
|
#2
|
|||
|
|||
![]() Воспользуйтесь функцией ShellExecute, например.
Код:
procedure TForm1.Button1Click(Sender: TObject); var hlpFilePath: string; begin hlpFilePath := ExtractFilePath(Application.ExeName) + 'Manual.html'; if FileExists(hlpFilePath) then ShellExecute(Handle, PChar('Open'), PChar(hlpFilePath), nil, PChar(ExtractFileDir(hlpFilePath)), SW_SHOWNORMAL); end; |
#3
|
|||
|
|||
![]() ага, в этом коде тоже ругается на ShellExecute
[Error] Unit2.pas(841): Undeclared identifier: 'ShellExecute' у меня был один простой кодик, я думал это в нем дело, оказалось что не в нем: ShellExecute(0, 'OPEN', './help/index.htm', PChar(''),'',1); |
#4
|
|||
|
|||
![]() Необходимо подключить модуль ShellAPI!
o_O |
#5
|
|||
|
|||
![]() Сделано , работает , спасибо !)
|