Abrir fichero de texto desde Delphi

[[Lepe]]

Busca en el foro por ShellExecute, es una funcion que pasado un nombre de archivo y varios parámetros, busca el programa asociado en windows y lo abre con el archivo pasado por parámetro.

Saludos

[Drahcir]

Perfecto!!! lo he solucionado de la siguiente manera.

uses
ShellAPI

.......

var
i: HWND;

.......

i := ShellExecute(Handle,'Open','c:\Fichero Prueba.txt',nil,nil,SW_SHOW);

Muchísimas gracias.

[Drahcir]

.... me ha surgido un pequeño problema, a ver si me podeis ayudar.

He almacenado el Nombre del fichero a mostrar en una variable String, ya q la aplicación genera 17 ficheros diferentes, por lo que a la hora de abrirlo intento hacerlo de la siguiente manera:

i := ShellExecute(Handle,'Open','c:\' + NombreFichero,nil,nil,SW_SHOW);

El caso es que al compilar de esta forma me dice:

E2010 Incompatible types: 'string' and 'PAnsiChar'...

He intentado solucionarlo de la siguiente manera:

i := ShellExecute(Handle,'Open','c:\' + PChar(NombreFichero),nil,nil,SW_SHOW);....

...pero no he solucionado nada. Alguien sabe que es lo que falla?

[[seoane]]

Prueba con esto

Código Delphi [-]
i := ShellExecute(Handle,'Open',PChar('c:\' +NombreFichero),nil,nil,SW_SHOW);

Recuerda que los PChar no se pueden sumar como los strings

[Drahcir]

Es lo que estaba probando y funciona perfectamente.

Muchas gracias.