Cita:
Empezado por lucho6007
Hola!
No se si ya pudiste resolver el problema, pero en Delphi podés usar la siguiente función:
Código Delphi [-]function MyShellFindExecutable(const aFileName: string): string; var Buffer: array[0..MAX_PATH] of Char; begin Result := ''; FillChar(Buffer, SizeOf(Buffer), #0); if (SHELLAPI.FindExecutable(PChar(aFileName), nil, Buffer) > 32) then Result := Buffer; end;
Si le pasas un nombre de archivo válido, te devuelve el archivo asociado. Si buscás por un .DOC y lo tenés ascociado a LibreOffice, te va a devolver la ubicación del exe que abre los .DOC.
Hay que agregar ShellAPI a la lista de unidades del uses.
¡Espero te sirva! |
Hola.
No necesitaría saber el ejecutavble asociado a una extensión, lo que necesito es saber el trayecto de instalación de LibreOffice, o poder consultar una lista de los programas instalados para buscar el libreoffice y obtener de alguna manera el trayecto.
Atte. Ramon