Enlaces a pagina web con IE7
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.
|