Abrir un archivo con su programa asociado

3149 vistas

Lo vamos a realizar usando la función ShellExecute de la unidad ShellAPI.



delphi
  1. ShellExecute(0, 'OPEN', 'C:\Mis documentos\mi archivo.doc', Nil, Nil, SW_SHOW);
  2. ShellExecute(0, 'OPEN', 'http://www.clubdevelopers.com', Nil, Nil, SW_SHOW);
  3. ShellExecute(0, 'OPEN', 'C:\MiCancion.MP3', Nil, Nil, SW_SHOW);
  4. ShellExecute(0, 'OPEN', 'mailto:uncorro@servidor.com', Nil, Nil, SW_SHOW);
  5. ShellExecute(0, 'OPEN', 'C:\projets\MiPrograma.exe', Nil, Nil, SW_SHOW);