Abrir fichero de texto desde Delphi

[Drahcir]

He generado, a partir de los datos obtenidos de una query , un fichero de texto que he guardado en local. El tema es que una vez guardado me gustaría mostrarlo, he intentado con Windows.OpenFile pero soy incapaz. No he encontrado nada por el foro que me sirva de referencia. Alguien puede ayudarme??

Graciasss.

[reevil]

prueba con esto

WinExec("D:file.txt",SW_SHOWNORMAL)


saludos

[Drahcir]

Lo estoy probando y parece que no va. De que forma tendría que mostrarmelo??, es la primera vez que intento hacer algo así y no tengo mucha idea.

Gracias de todas formas por tu información.

[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


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.