Модераторы: Snowy, Poseidon, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Twebbrowser, при нажатии по ссылке открыть ехе 
V
    Опции темы
zhefran
Дата 11.3.2008, 16:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 237
Регистрация: 27.9.2007
Где: Винница-Киев-Ирпе нь-?, Украина

Репутация: нет
Всего: нет
У меня в Twebbrowser подгружаеться страничка.На ней ссылка например 'calc.exe' как сделать, что бы при нажатии на эту ссылку открывался калькулятор.
Как запускать прогу я знаю.
Как отловить нажатие на ссылку? Находил, что надо использовать OnNavigate.
В событиях Д7 есть OnBeforeNavigate2 и OnNavigateComplete2. Это они или есть отдельный OnNavigate?
--------------------
Ніщо нізвідки не виникає і нікуди не дівається!Лечение компьютеров от вирусов! Бесплатно!
PM MAIL WWW ICQ   Вверх
MetalFan
Дата 11.3.2008, 16:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 14
Всего: 128
Цитата(zhefran @  11.3.2008,  16:19 Найти цитируемый пост)
Это они или есть отдельный OnNavigate? 

а проверить религия не позволяет? )


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
zhefran
Дата 11.3.2008, 17:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 237
Регистрация: 27.9.2007
Где: Винница-Киев-Ирпе нь-?, Украина

Репутация: нет
Всего: нет
Цитата(MetalFan @  11.3.2008,  16:54 Найти цитируемый пост)
а проверить религия не позволяет? ) 

ха-ха-ха!:(
А ответ нормальный дать или надо обязательно остроумничать?

--------------------
Ніщо нізвідки не виникає і нікуди не дівається!Лечение компьютеров от вирусов! Бесплатно!
PM MAIL WWW ICQ   Вверх
MetalFan
Дата 11.3.2008, 18:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 14
Всего: 128
Цитата(zhefran @  11.3.2008,  17:49 Найти цитируемый пост)
А ответ нормальный дать или надо обязательно остроумничать?

отвечать на такого типа вопросы - потакать ленивым авторам.

в чем проблема то? что тебе самому мешает проверить эти два события?




--------------------
There are always someone smarter than you...
PM MAIL   Вверх
zhefran
Дата 11.3.2008, 19:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 237
Регистрация: 27.9.2007
Где: Винница-Киев-Ирпе нь-?, Украина

Репутация: нет
Всего: нет
1. BeforeNavigate - действие выполняется до загрузки.
2. NavigateComplete - загрузка произошла еще не полностью, но действие происходит.
Я не знаю как отловить нажатие на ссылке. Если в 2. тупо прописать WinExec, то калькулятор будет запускаться при загрузке страници и при нажатии на ссылке, и дальше при каждой загрузке страницы.

  

--------------------
Ніщо нізвідки не виникає і нікуди не дівається!Лечение компьютеров от вирусов! Бесплатно!
PM MAIL WWW ICQ   Вверх
MetalFan
Дата 11.3.2008, 20:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 14
Всего: 128
Цитата(zhefran @  11.3.2008,  19:11 Найти цитируемый пост)
1. BeforeNavigate - действие выполняется до загрузки.

при клике не возникает?


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
zhefran
Дата 12.3.2008, 13:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 237
Регистрация: 27.9.2007
Где: Винница-Киев-Ирпе нь-?, Украина

Репутация: нет
Всего: нет
Пробую
Код

procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
  Headers: OleVariant; var Cancel: WordBool);
begin
  showMessage(url);
   if url='g:\1.html' then
    winexec('calc.exe',Sw_Shownormal);
end;


 и все получаеться!

Это сообщение отредактировал(а) zhefran - 12.3.2008, 17:18
--------------------
Ніщо нізвідки не виникає і нікуди не дівається!Лечение компьютеров от вирусов! Бесплатно!
PM MAIL WWW ICQ   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Сети"
Snowy
Poseidon
MetalFan

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Сети | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0643 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.