Сообщество Чайников

Вопрос

Как открыть ссылку на документ в интернете в браузере, установленном по умолчанию? Например, для обработчика события Click кнопки HomePage.

Ответ

Возможен такой вариант

Procedure TForm1.XClick(Sender: TObject);
Var
St: Array[0..255] of Char;
Begin
ShellExecute(Application.Handle, 'open', StrPCopy(St,'http://' + Label1.Caption),
nil, nil, SW_SHOW);
End;

Вместо LAbel1.Caption можно вставить понятно что.

Sergey