Ver Mensaje Individual
  #2  
Antiguo 25-03-2008
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Reputación: 24
enecumene Va por buen camino
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.
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
Responder Con Cita