Ver Mensaje Individual
  #4 (permalink)  
Antiguo 23/03/2008, 15:53
husky_white
 
Fecha de Ingreso: marzo-2008
Mensajes: 8
Antigüedad: 16 años, 2 meses
Puntos: 0
Re: Como poner un link (para web) en un boton de Delphi?

Saludos Juanew, lo que te decía de que buscaras el TMania es en la página Web http://www.q3.nu/trucomania/. Revisa es página y encontrarás varios truco para Delphi.
Te mando el ejemplo del código que necesitas para hacer lo que quieres. Espero te sirva. Suerte

Incluye 'ShellApi' en el uses de tu fom y ejecuta esto:





ShellExecute(Form1.Handle,nil,PChar('index.html'), '','',SW_SHOWNORMAL);




Peeero, de esta manera, la segunda vez que lo ejecutamos, en lugar de abrirnos otra ventana con
otro explorador web, nos cargará la segunda página que le hemos pedido en la misma ventana.
Para ejecutar varias instancias del explorador web podemos usar esta otra manera:

Incluye 'UrlMon' en el uses de la form y ejecuta esto:



HlinkNavigateString(Nil,'index.html');



Si vamos a usar una variable para pasar el dato, ésta debe ser una WideString, ó, si queremos usar una string,
debemos hacer el siguiente Typecast:


var
Dire : String;
begin
Dire := 'http://www.google.com';
HLinkNavigateString(NIL, PWideChar(WideString(Dire)) );
end;