Вот пиши на OnCreate формы:
Код:
Button1.Font.Style:=Button1.Font.Style+[fsUnderline];
Button1.Cursor:=crHandPoint;
Дальше поработай с Font.Style и цветом - это легко.
Вот пиши на OnClick у кнопки:
Код:
ShellExecute(Handle,'open','www.site.ru',nil,nil,SW_SHOW);