Relleno de campos en word desde delphi

[[enecumene]]

Hola, en realidad no estoy entendiendo muy bien lo que quieres hacer, a ver, quieres que haciendo una consulta a traves de un query mostrar los resultados de la consulta en las variables de la plantilla, no?, bueno si es asi eso es algo muy sencillo si no es asi me lo haces saber:

Código Delphi [-]
 uses ComObj;...
var  
Word: Variant;  
Documento: Variant;
begin  
   (* Creas un objeto Word *)  
   Word := ComObj.CreateOleObject('Word.Application');  
   (* Añades un documento basado en la plantilla *)  
   Documento :=   Word.Documents.Add('carta.dot');  
  (* Asignas valores a los campos *)  
  Documento.Variables.Add('nombre',     Query1.fieldbyname('nombre').asstring);
  Documento.Variables.Add('direccion',Query1.fieldbyname('domicilio').asstring);  
  Documento.Variables.Add('fecha',Query1.fieldbyname('fecha').asstring);  
  Documento.Variables.Add('deuda', Query1.fieldbyname('deuda').asstring);
 end;
End.

espero que te funcione.

Saludos.