Delphi - ShellExecute con Parametros

Estimados amigos:

Necesito abriri un documentos de Word. Entiendo que hay que hacerlo con ShellExecute pero aunque me abre bien en Word el documentos al contener espacios, parte la ruta intentando abrir varios documentos.

Yo tengo el Word en : d:\Archivos de programa\Microsoft Office\Office\WINWORD.EXE
y quiero abrir : C:\Mis Documentos\Documento Word.doc

Desde el comando ejecutar de windows se abriría con la siguioente instrucción:

"d:\Archivos de programa\Microsoft Office\Office\WINWORD.EXE" "C:\Mis Documentos\Documento Word.doc"

Pero aunque he conseguido intercalar las comillas en delphi :

ShellExecute(Application.Handle, 'open',
FileName :='d:\Archivos de programa\Microsoft Office\Office\WINWORD.EXE',
StrPCopy(F, FileName);
P := ' ' + '''' +'C:\Mis Documentos\C:\Mis Documentos\Documento Word.doc'+ '''';
StrPCopy(P, Params);

ShellExecute(Application.Handle, 'open', F, P, nil, SW_NORMAL);

Me abre el Word y tres documentos ':\Mis ,Documentos\Documento y Word.doc. Este úiltimo además lo intenta abrir en el directorio de la aplicación.

Tampoco me vale abrir el fichero y que el Api de Windows me abra el programa porque puede darse la cisrcustancia de querer abrir el documentos con otro programa.

Hola:

No se si es esto lo que buscas:

procedure TForm1.FormCreate(Sender: TObject);
var
sFichero: string;
begin
sFichero := 'C:\WPDocs\Textowp.wpd';
ShellExecute(Handle, 'open', PChar('C:\Archivos de programa\WordPerfect Office 12\Programs\wpwin12.exe'), PChar(sFichero), nil, SW_SHOW);
end;

Con esto cargo en el procesador WordPerfect el fichero Textowp.wpd.

Sustituye
PChar('C:\Archivos de programa\WordPerfect Office 12\Programs\wpwin12.exe')
por la ruta tuya de word

y 'C:\WPDocs\Textowp.wpd'
por la ruta y nombre de tu fichero .doc

y debe de funcionar.

Suerte.

El problema es cuando la ruta tiene espacios.

Hola:

¿Que quiere decir que la ruta tiene espacios?

¿Cuál es el problema?

Suerte.