Ver Mensaje Individual
  #3  
Antiguo 26-11-2004
rafita rafita is offline
Miembro
 
Registrado: ago 2003
Ubicación: Cuenca- España.
Posts: 309
Reputación: 21
rafita Va por buen camino
Hola Kye_z,

como te dice Neftali, busca TWordApplication.

Te pongo un pequeño trozo de código de lo que buscas, con un par de parámetros localizados, el resto no los sé (ni tampoco lo he necesitado).

Código:
var Fichero, Marcador, Contenido, SoloLectura, SalvarCambios, FormatoOriginal, Ruta : OleVariant;
    Doc : _document;
    Posicion : Range;
begin
  try
    Word.Connect;
  except
    ShowMessage('Word no está instalado en este equipo.');
    Abort;
  end;

  Fichero:='e:\Pruebas Delphi\carta.doc';
  SoloLectura:=True;
  Doc:=Word.Documents.Open(Fichero, EmptyParam, SoloLectura, EmptyParam, EmptyParam, EmptyParam,
       EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
       EmptyParam, EmptyParam);
Nota: Word es el nombre que le he puesto al objeto TWordApplication.
__________________
Rafita.
Responder Con Cita