Tema: Word
Ver Mensaje Individual
  #1  
Antiguo 14-11-2008
emeritos emeritos is offline
Miembro
 
Registrado: may 2003
Posts: 314
Reputación: 24
emeritos Va por buen camino
Word

Hola,

En un tema que ahora no encuentro se hablama de como abrir el word y cargarle datos de una B.D. y asi lo hice y salio bien (de monento), lo hice asi:


// Creas un objeto Word
Word := CreateOleObject('Word.Application');

// Añades un documento basado en la plantilla
Word.Documents.Add('archivo.dot');
Documento := Word.Documents.Item(1);

// Asignas valores a los campos
Documento.Variables.Add('ncuadro', 'valor']);
Documento.Variables.Add('campo1', 'valor1']);
Documento.Variables.Add('campo2', 'valor2']);

Documento.Fields.Update;
Word.ActiveWindow.View.ShowFieldCodes := false;
Word.Visible := true;


Hasta ahi correcto y cuando cierro el From pongo
Word.Visible := false;


Pues bien cuando salgo de la aplicacion me da este error:

En tiempo de ejecucion -->

"Access violation at address 774FCACF in module ole32.dll"
"Runtime error 216 at 00403A1A "

¿ Como puedo solucionarlo ? ¿ Me falta alguna etiqueta para cerrar bien el word?

PD. Eso si si despues de cerrar la aplicacion intento borrar el fichero archivo.dot, me dice que no puedo eliminarlo por que otro usuario lo esta utilizando.

Eso si esto utilizando Delphi 7 y me encontrado en la pestaña de Servers objetos del word y del exect pero no se utilizarlo (supongo que es para lo mismo), alguna suguerencia de como se utilizan.
Responder Con Cita