Compañeros, ahora que encontre la solución a mi problema me doy cuenta que es realmente sencillo pero teniendo en cuenta que alguien puede caer en el mismo error, comento que es solo escribir en el nombre del archivo el fullname, es decir especificar el path.

katsyae <katsyae@...> wrote:

Compañeros del grupo,

Tengo un pequeño problema y necesito de su ayuda, necesito de alguna
manera administrar algunos documentos generados por Microsoft Word,
hasta el momento he podido crear y abrir documentos, y darles nombre
previamente, pero quisiera poder predefinir el "path" ya que como lo
estoy haciendo toma por defecto la carpeta de mis documentos,
adjunto la manera como lo estoy haciendo hasta ahora para ver si
alguien me puede ayudar. Gracias.


//===============
Tengo un componente TWordapplication

procedure TFWord.P_EjecutarWord;
begin
  try
    GetActiveOleObject('Word.Application');
  except
    WordApplication1.Disconnect;
    WordApplication1.Connect;
  end;
   WordApplication1.Visible := True;
end;


procedure TFWord.CrearDocumento(Sender: TObject);
var a:OleVariant;

begin
  a:='nombre del archivo';
  P_EjecutarWord;
  WordApplication1.Documents.AddOld
(EmptyParam,EmptyParam);//,EmptyParam,EmptyParam);
  WordApplication1.ActiveDocument.SaveAs
(a,EmptyParam,EmptyParam,EmptyParam,
 
EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,Emp
tyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam);
end;

Espero que puedan ayudarme, Gracias





------------------------------
DesarrolloDelphi:
Desarrollo de Software en Borland Delphi
------------------------------
Direcciones de la lista:
Publicar un mensaje: DesarrolloDelphi@...
Suscribirse........: DesarrolloDelphi-Subscribe@...
Desuscribirse......: DesarrolloDelphi-Unsubscribe@...
Administrador......: DesarrolloDelphi-Owner@...
Página de la lista.: http://www.gruposyahoo.com.ar/group/DesarrolloDelphi
------------------------------