Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TWebBrowser и ивенты


Ш-К ©   (2006-11-09 15:01:00) 

Как назначить TWebBrowser-у обработчик, например, OnClick.
Видимость от TControl поднял, все равно не работает.


TStas   (2006-11-12 16:20:00) [1]

Я вот тоже хотел как programania ответить. Можно даже чуть подробнее:
<SomeTag ID="SomeID" onclick="document.title=event.srcElement.id"> Вот и получишь ID по кому кликнулись. Только если докУмент ХТМЛьный сам пишешь, а если не сам - то не знаю как.
>Дмитрий Белькевич ©  Дык фары в экспролере хоть из миномета расстреливаются и легко очень, только вот при чем здесь Дельфи - не ясно


Дмитрий Белькевич   (2006-11-11 07:13:00) [2]

Я вот думаю, кто и кому (себе?) такие бредовые задачи ставит?
Шары? В эксплорере? Из пушки? Блин, бред какой-то в самом деле.


Ш-К   (2006-11-10 13:46:00) [3]

Разобрался. Есть фича: http://bsalsa.com/edit_designer.html
которая прикручивается к IHTMLDocument2, и туда перенаправляются все вызовы.


Германн   (2006-11-10 00:06:00) [4]


> Ш-К   (09.11.06 17:24) [8]
>
> чтобы в проге шары падали, а их из пушки расстреливали
>

Шо, опять? http://www.delphimaster.ru/cgi-bin/nuts.pl?&showpage=3


programania   (2006-11-09 20:59:00) [5]

если в тексте страницы при нужном событии присвоить
document.title='Привет из JavaScript';
то в delphi вызовется WebBrowser1TitleChange и получит этот текст


Ketmar   (2006-11-09 17:51:00) [6]

>[8] Ш-К 9-Nov-2006, 17:24
>Как это может помоч с ответами?
уже помогло. а сказал бы сразу -- я бы не потратил столько времени на эту ветку.


Ш-К   (2006-11-09 17:24:00) [7]

чтобы в проге шары падали, а их из пушки расстреливали

У меня что, не может быть причин подключиться к событиям IWebBrowser?
Есть компонент THTMLEdit http://bsalsa.com/tdhtml_edit.html
обертка над DHTMLEDLib_TLB.TDHTMLEdit
мне нужно перевести в нутрях  TDHTMLEdit на TEmbeddedWB.
У TEmbeddedWB нет обработчиков от мыши и клавы.
Как это может помоч с ответами?


Ketmar   (2006-11-09 16:58:00) [8]

для тех, кто не понял: внимательно читаем [1]. по буквам:
з
а
ч
е
м
?


Ш-К   (2006-11-09 16:52:00) [9]

Поднимаю вопрос.
Как привязать свои обработчики к событиям TWebBrowser?
type
 TForm1 = class(TForm)
   WebBrowser1: TWebBrowser;
   procedure FormCreate(Sender: TObject);
 private
   procedure DoWBClick(Sender: TObject);
   { Private declarations }
 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation

type
 TWebBrowserAccess = class(TWebBrowser);
{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
 TWebBrowserAccess(WebBrowser1).OnClick := DoWBClick;
end;

procedure TForm1.DoWBClick(Sender: TObject);
begin
 ShowMessage('zdfvds');
end;


Что бы вызвался ShowMessage.
Можно? скажите как.
Нельзя - почему?

Для тех, чья рыдает. Не знаю, как еще проще объяснить.


Ketmar   (2006-11-09 16:31:00) [10]

обалдеть. моя удаляется, рыдая.


Ш-К   (2006-11-09 16:27:00) [11]

не вызывается:
procedure TForm1.WebBrowser1Click(Sender: TObject);
begin
 
end;


Ketmar   (2006-11-09 15:37:00) [12]

я тебя спрашивал, что не работает?


Ш-К   (2006-11-09 15:23:00) [13]

Когда в TWebBrowser загружен документ, обработчики OnClick, OnKey.. и тд не вызываются.


Ketmar   (2006-11-09 15:21:00) [14]

OnClick что, собственно??? это ActiveX, он сам обрабатывает. поясни, что тебе надо и зачем.


Наверх

Титульная страница Поиск, карта сайта Написать письмо