PDA

Ver la Versión Completa : shellexecute.


REHome
26-09-2005, 10:36:10
Hola:

Hace tiempo que dejé delphi cuando estaba empezando a programar.

Puse en el Form1 un label1, en ese label1 al pinchar con el ratón quiero que aparezca o se habrá la web con esta dirección:

http://www.google.com

¿Cómo puedo hacerlo?

Lo mismo con ejecutar el notepad.exe con un botón y se habrá.

Se que s ehace con shellexecute pero no recuerdo el código compelto de cabeza. Si en "use" lleva algo también indicamelo.

Un cordial saludos.

dec
26-09-2005, 10:51:56
Hola,

Suponiendo que en "Label1.Caption" está la URL que mencionas podrías hacer algo así:


uses
ShellApi;

procedure TForm1.Label1Click(Sender: TObject);
begin
ShellExecute(Self.Handle, 'open',
PChar(label1.Caption), nil, nil, 0);
end;

Para ejecutar el "NotePad" la cosa es similar, salvo que en lugar de la URL habrías de utilizar la ruta del programa: creo que con el nombre del ejecutable valdría, esto es:


ShellExecute(Self.Handle, 'open',
PChar('notepad.exe'), nil, nil, 0);

De todos modos echa un vistazo a las posibilidades de "ShellExecute" en la ayuda del SDK de Win32 (que está disponible en el menú de ayuda de Delphi).

REHome
26-09-2005, 11:23:25
Respuesta rápida, muchas gracias.