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

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

Создание ссылки [D5, Win95/98]

VJar ©   (2002-05-15 21:39:00) 

Как создать ссылку, которая открывала бы
определенную страницу, в сиде обычного
Label на форме??? (И при наведении менялся курсор)

---

Almaz   (2002-05-16 00:04:00) [1]

> Song © (15.05.02 23:34)

А чем универсальней-то ? И то и другое откроют страничку в браузере, установленном в системе.

Удачи.

---

Song   (2002-05-15 23:34:00) [2]

2Almaz © (15.05.02 23:27)
По-моему так универсальней:
procedure TForm1.Label1Click(Sender: TObject);
begin
ShellExecute(Handle,"open",PChar(Label1.Caption),nil,nil,SW_SHOWNORMAL);
end;

---

Almaz   (2002-05-15 23:27:00) [3]

> VJar (15.05.02 21:39)

На счет курсора см. Song © (15.05.02 23:07), а что касается перехода по клику, то в OnClick для Label напиши следующее:

uses ..., UrlMon.

...
procedure TForm1.Label1Click(Sender: TObject);
begin
HlinkSimpleNavigateToString("www.mmm100.com", nil,
nil, nil, nil, nil, 0, 0);
end;

Удачи.

---

Song   (2002-05-15 23:07:00) [4]

Всё просто: TLabel.Cursor
Какие проблемы?

---

KaPaT   (2002-05-15 22:17:00) [5]

Возь у лэйбала поменяй цвет и подчеркнутость....еще поменяй тип курсора...дальше обрабатывай OnClick....
или ищи компоненты которые сказаны выше =)

---

S@shka   (2002-05-15 22:07:00) [6]

есть компонент такой поищи в инете
TURLLabel
я где то даже видел но точно не скажу.

---

Наверх