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');
|