salut
procedure Tjesaispaskoi.GoClick(Sender: TObject);
begin
ShellExecute(Handle,'open',PChar(edit1.text),nil,nil,SW_SHOW);
end;
tu tappe www.hardware.fr/html/articles dans to Tedit et ça doit ouvrir la page
sinon:
ShellExecute(Handle,'open',PChar('www.hardware.fr/html/articles'),nil,nil,SW_SHOW);