Cómo importar registros de una base de datos a Word en Delphi
N.º: QA004684
Fecha de creación: 18 de mayo de 2003 Fecha de última modificación: 20 de mayo de 2003
Categoría:
Delphi - base de datos
pq :
El sistema que uso es win2000, delphi es la versión 6.0 y word2000.
Pregunta: En Delphi, necesitamos importar los registros de la base de datos a Word y crearlos en forma de tablas. Necesitamos mostrar dos tablas una al lado de la otra en una página en Word.
respuesta :
Mi respuesta a esta pregunta es la siguiente: he tenido problemas similares, pero vertí los datos en TXT. También está dibujado en forma de tabla, pero creo que es lo mismo.
Lo importante es que configures una variable para que sea de tipo TStrings
como:
var
TXTstr:TStrings;
comenzar
TXTstr := TStringList.Create;
TXTstr.Append('────────┬────┬─────┬─────┬─────');
TXTstr.Append('Nombre│'); //Primera línea
.... //Obtener valor de la base de datos a TXTADO
mientras no TXTADO.Ede hacer
Comenzar
TXTstr[1]:=TXTstr[1]+format('%8s',[TXTADO.FieldByName('XM').Asstring])+'│';
TXTADO.siguiente;
fin;
Nota del moderador: Se requieren dos pasos para completar esta pregunta. Uno es leer los datos en la base de datos y el otro es usar la tecnología de automatización para controlar Word para completar la composición tipográfica y guardarlo como un archivo de Word o imprimirlo. El primer paso se presentó anteriormente. Para el segundo paso, consulte: QA003053 "Utilice Delphi4.0 para controlar Word97 directamente".
opinión de loga :
Si es VB, puede abrir la macro grabada en WORD, luego agregar manualmente los registros de la base de datos y VBA puede escribir el código automáticamente. Un vistazo es sólo como referencia.
Preguntas relacionadas:
QA000836 "Cómo saber el conjunto de comandos de Excel97"
QA001381 "Cómo controlar Word y Excel en VB"
QA003819 "Cómo agregar texto a Word usando OLE"
Esta pregunta fue respondida por Huang Wei .