Mira que no haga lo quieres lo que esperas es una cosa pero el codigo esta bien pero lo que quieres hacer es esto.
Código Delphi
[-]
Var
url: string
Begin
ShellExecute(Handle,nil,PChar(url),'','',SW_SHOWNORMAL)
end;
Asi haces lo que de verda esperas ya que si no especificas la aplicacion esta llamara aplicacion por defecto no solo para paginas sino para cualquier archivo.