Форум: "Основная";
Текущий архив: 2004.02.13;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.009 c