Ya lo solucione, era un parametro del RvNDRwriter,yo lo dejaba en modo por defecto como el delphi me lo insertaba y habia que cambiarlo a smuser, de esta forma no se vuelve loco y comienza a dar errores.
El codigo de como me ha quedado el metodo a groso modo es el siguiente:
Código:
procedure TFInformesPaciente.GenerarInformeConWord;
var
NDRStream: TMemoryStream;
fich: string;
begin
NDRStream := TMemoryStream.Create;
try
fich := 'C:\WINDOWS\temp\inftemporal.RTF';
RvProject2.Engine := RvNDRWriter1;
RvProject2.Open;
NDRStream := TMemoryStream.Create;
RvProject2.SaveToStream(NDRStream);
RvNDRWriter1.Stream:= NDRStream;
RvProject2.Execute;
try
RvRenderRTF1.PrintRender(NDRStream,fich);
except
raise Exception.Create('Error al crear fichero');
end;
RvProject2.close;
finally
NDRStream.Free;
end;
if fileExists(fich) then
begin
try
LMDStarter1.Command:='C:\Archivos de programa\Microsoft Office\OFFICE11\WINWORD.EXE';
LMDStarter1.Parameters:=fich;
LMDStarter1.Execute;
except
ShowMessage('Error al iniciar el word.');
end;
end;
Gracias Loviedo por tu ayuda.