Текущий архив: 2004.02.13;
Скачать: CL | DM;
Вниз
TWebBrowser Найти похожие ветки
← →
BlackLord2003 © (2004-02-03 14:31) [0]А у меня такой вопрос. Как сделать так, чтобы на панели статуса отображался адресс гипперссылки, на которую наведён курсор?
Спасибо!
← →
Илюха © (2004-02-03 15:25) [1]Я тебя не понял!
В смысле, в ссылке пишется адресс того, где сы сейчас? Или что?
← →
int64 (2004-02-03 17:32) [2]OnStatusTextChange
← →
BlackLord2003 © (2004-02-03 18:15) [3]<Илюха>
Нет, например я загрузил документ. Навожу на ссылку мышкой и на панели статуса должен высветится адрес, куда ты попадёшь, если нажмёшь.
<int64>
Если можно, то по подробнее и с кодом!
← →
int64 (2004-02-04 10:36) [4]1. На форме выделяется объект WebBrowser1.
2. В инспекторе объектов на закладке Events два раза кликаете на свойстве OnStatusTextChange. Появится следующая конструкция:
procedure TForm1.WebBrowser1StatusTextChange(Sender: TObject;
const Text: WideString);
begin
end;
3. Обратите внимание на const Text: WideString. В ней содержится текст, который появляется в статусбар IE.
4. Высвечивайте этот текст, где надо.
procedure TForm1.WebBrowser1StatusTextChange(Sender: TObject;
const Text: WideString);
begin
Caption:= Text;
end;
Страницы: 1 вся ветка
Текущий архив: 2004.02.13;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.023 c
