Открытие сайта, ссылка на который находится в Label

← →
Serg1981 (2005-05-29 17:43) [0]

Имеется Label с ссылкой на сайт (свойство Caption). Что написать в OnClick чтобы открылось окно Internet Explorer с этой ссылкой ?

← →
Sergey Masloff (2005-05-29 18:02) [1]

см. ShellExecute()

← →
Anatoly Podgoretsky © (2005-05-29 18:10) [2]

http://podgoretsky.com/ftp/Language/nps/ru.delphi.internet.html#N29

← →
Starcom (2005-05-29 21:29) [3]

Serg1981...

uses ShellApi;

begin
ShellExecute(0, nil,"http://www.narod.ru",nil,nil,1);
end;

С Уважением Starcom! :-|)

uses ShellAPI
...
В OnClick:
shellexecute(0,"open",pchar(label1.Caption),"","",SW_SHOWNORMAL);