Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.21;
Скачать: CL | DM;

Вниз

Как в WebBrowser1 при нажатии на html-ссылку выполнить программу?   Найти похожие ветки 

 
brestmarket   (2002-10-08 11:23) [0]

а также в WebBrowser1 открыть определенный каталог в shell (проводник).


 
brestmarket   (2002-10-08 18:49) [1]

Ребята, важный для меня вопрос. Please help!


 
int64 ©   (2002-10-09 00:02) [2]

procedure TForm1.FormCreate(Sender: TObject);
begin
WebBrowser1.Navigate("about:<a href="myprotocol:\\mylink">Жми сюда</a>");
end;

procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
Headers: OleVariant; var Cancel: WordBool);
begin
if url="myprotocol:\\mylink" then
begin
Cancel:= True;
WinExec("Calc", 0);
WebBrowser1.Navigate("C:\Program Files");
end;
end;


 
brestmarket   (2002-10-09 02:10) [3]

Спасибо. Очень помогли. Интересовал также вопрос, как открыть любую папку не в WebBrowser, а в shell, т.е. в Проводнике.


 
int64 ©   (2002-10-09 03:19) [4]

Например:
ShellExecute(handle, "", "", "C:\Program Files","", sw_normal);
или проводник:
ShellExecute(handle, "", "explorer", "C:\Program Files","", sw_normal);


 
brestmarket   (2002-10-09 13:25) [5]

Большое спасибо, int64.
Позвольте последний вопрос:
Где прочитать про варианты для записи вместо myprotocol - в help delphi - ничего про это не сказано, кроме вариантов about, res, https. Мне необходимо ссылку с локального диска сравнить с url - ничего не получается, в чем-же причина?


 
brestmarket   (2002-10-09 13:28) [6]

Ссылка в html-файле такая:
c:\folder\subfolder\file.exe
Как записать ее для сравнения с url ?
p.s. Королевство Дельфи имеет 1 неработающий ответ на этот вопрос ;(!


 
int64 ©   (2002-10-09 17:27) [7]

myprotocol это просто набор символов. Его можно вообще не писать.
Иногда удобно оформлять ссылки в виде:
href="Procedure1:\\Value", а потом в программе анализировать.
И тогда с браузера запускаются любые процедуры с параметрами.
Или как в твоём примере:
href="ShellExecute:\\c:\folder\subfolder\file.exe"
или
href="ShellExecute:\\c:\folder\subfolder\"

Когда сравниваешь стринги, надо следить за регистром. Это всетаки не идентификаторы. Диски обозначаются заглавными буквами.



Страницы: 1 вся ветка

Текущий архив: 2002.10.21;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.016 c
3-68636
riland
2002-09-26 18:38
2002.10.21
Вопрос о защите данных в приложении


3-68627
Александр1
2002-09-28 10:45
2002.10.21
Удаление с помощью триггера


1-68861
Николай Быков
2002-10-10 15:00
2002.10.21
type TMyType= packed record


1-68769
Петя
2002-10-11 16:47
2002.10.21
exit Code


3-68605
Link
2002-09-28 08:20
2002.10.21
максимальное значение