shellexecute.

dec · #2 26-09-2005

Hola,

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

Código Delphi [-] 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:

Código Delphi [-]   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).