Ver Mensaje Individual
  #4  
Antiguo 10-07-2010
edgargh edgargh is offline
Miembro
 
Registrado: jun 2006
Ubicación: León, Guanajuato
Posts: 25
Reputación: 0
edgargh Va por buen camino
si se puede hacer, pero tendrias que hacerlo a traves de la propiedad insertable de word.

esa propiedad te pide de parametros el ancho de la tabla, numero de registros, numero de columnas, separador (el caracter con el que quieres que se pase de una columna a otra), texto (la informacion con la que vas a llenar la tabla) y el marcador en donde vas a insertar la tabla con la informacion

para el texto yo utilizo una variable tipo string en donde voy generando la cadena con la información de los registros del query que quiero mandar a la tabla

ejemplo:

cadena:string;

cadena:='';

qry_x.close;
qry_x.open;

qry_x.first

while not qry_x.Eof do
begin
cadena := cadena+qry_x.FieldByName('nombre').AsString;
cadena := cadena+'&'+qry_x.FieldByName('apellido').AsString
end;

inserttable(500,qry_x.RecordCount+1,2,'&','Nombre & Apellido'+wraptext(#10+cadena,'nombredelmarcador');
Responder Con Cita