Abrir Internet Explorer desde Delphi, pasándole la dirección

[ea6zs]

Hola a tod@s
Imaginad que en un form temenos un edit con una dirección tipo: www., http, o incluso una dirección de un archivo htm en nuestro propia equipo.
Quiero poner en fucionamiento Internet Explorer (o cualquier otro explorador), mediante winexec, pero ¿como le indico que vaya a la dirección que indicaba en el edit del form?
Hasta ahora consigo poner en funcioamiento el explorador pero va a la dirección que tiene configurado por defecto.
Gracias;)

[marcoszorrilla]

procedure TForm1.Button2Click(Sender: TObject);
begin
ShellExecute(self.handle, 'open', 'http://www.clubdelphi.com', nil, nil,
SW_SHOWNORMAL);
end;

No olvides incluir la unidad ShellApi en tu formulario.

Un Saludo.

[dec]

Hola,


uses
ShellApi;

{...}

begin
ShellExecute('open', 'file:///C:/archivo.html', nil, nil, SW_NORMAL);
end;


PD. La próxima vez presta atención dónde pones tu mensaje: el foro "Tablas planas" no parece apropiado para este asunto, así que lo he movido a "Varios".

[ea6zs]

:)Muchas gracias a ambos, probaré vuestras soluciones.

[adan12]

procedure TForm1.Button2Click(Sender: TObject);
begin
ShellExecute(self.handle, 'open', 'http://www.clubdelphi.com', nil, nil,
SW_SHOWNORMAL);
end;

http://www.clubdelphi.com si en ves de ese web site quisiera poner un edit1 para poner cualquiera otras mas web como seria ? disculpen

[beginner01]

Hola.

Recuerda poner las etiquetas [/ DELPHI] para encerrar el código.

Prueba así.

[DELPHI]

procedure TForm1.Button2Click(Sender: TObject);
begin
ShellExecute(self.handle, 'open', PChar(Edit1.Text), nil, nil,
SW_SHOWNORMAL);
end;

[adan12]

muchas gracias me funciono correcto ok