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

Вниз

Ссылки   Найти похожие ветки 

← →
PycUS   (2002-07-01 22:12) [0]

4. Как сделать ссылку на сайт, что бы при клике запускался IE.

---

← →
Viewer   (2002-07-01 22:31) [1]

uses ShellAPI;
..

*.OnClick..
..
ShellExecute(GetDesktopWindow(), nil, PChar("delphi.mastak.ru"), nil, nil, 0);

---

← →
Юрий Зотов ©   (2002-07-01 22:37) [2]

В обработчике клика по этой ссылке пишем:

ShellExecute(0, nil, PChar(ссылка_в_виде_строки), nil, nil, 0);

Правда, запустится не обязательно IE. Запустится браузер по умолчанию - тот, который юзеру и нужен.

---

← →
PycUS   (2002-07-04 21:48) [3]

Кинул это на StaticText1. При нажатии ни чего не грузится

---

← →
Viewer   (2002-07-04 22:01) [4]

С превеликим удовольствием грузиться

ShellExecute(GetDesktopWindow(), nil, PChar(" http://www.aport.ru"), nil, nil, 0);

---

← →
SPeller ©   (2002-07-05 11:57) [5]

А я делал так:

ShellExecute(Application.Handle, nil,PChar(lblweb.Caption), nil, nil, SW_NORMAL )

ЗЫ: Нашёл это где-то в компонентах типа URLLabel

---

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

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

Наверх

Память: 0.47 MB
Время: 0.015 c