[jorgegetafe]

Saludos, quiero hacer en mi programa unos accesos directos a paginas web, tengo internet explorer 7 y no me funciona ninguno de estos procedimientos en mi form pongo:


uses UrlMon

procedure TForm1.Button1Click(Sender: TObject);
begin
HlinkNavigateString(Nil,'http://www.google.es/');
end;


Y tambien el otro, que es el que yo he usado cuando me ha hecho falta:

Con uses ShellApi:

procedure TForm1.Button2Click(Sender: TObject);
begin
ShellExecute(Form1.Handle,nil,PChar('http://www.google.es/'),'','',SW_SHOWNORMAL);
end;

El error que me aparece es: "[Error] Unit1.pas(735): Statement expected, but expression of type 'HRESULT' found" )

Creo que es por una inconpatibilidad con IE7, ¿alguien sabe como hacerlo de otra forma?

¿o me tengo que aguantar y no puedo poner enlaces a paginas de internet?

muchas gracias.