Hallo,
ich habe es mit folgendem Beispiel geschafft, mein
DB-Grid in Word zu exportieren:
http://delphi.cjcsoft.net//viewthread.php?tid=47128
Ich möchte nun gerne mittels
OLE-Automation darüber, sowie darunter Text in das Dokument schreiben können.
Das mache ich folgendermaßen:
Delphi-Quellcode:
begin
try
Word := CreateOleObject('
Word.Application');
except
ShowMessage('
Fehler.');
exit;
end;
WordDokument := Word.Application.Documents.Add;
Word.Visible := true;
// Schriftart für die Überschrift
Word.Selection.Font.
Name := '
Calibri';
Word.Selection.Font.Size := 20;
Word.Selection.ParagraphFormat.Alignment := 1;
// Überschrift
Word.Selection.TypeText('
EinText');
// Schriftart für restlichen Text
Word.Selection.Font.Size := 11;
Word.Selection.ParagraphFormat.Alignment := 0;
// Text einfügen
Word.Selection.TypeText('
Firma: Musterfirma GmbH'+#13);
Word.Selection.TypeText('
Mitarbeiter: '+Vorname+'
'+Nachname+#13);
Word.Selection.TypeText('
Personalnummer: '+inttostr(PersonalNr)+#13+#13);
end;
//DB-Grid einfügen
Ich habe schon versucht den Code der verlinkten Seite einzubauen. Er erstellt mir daraufhin aber immer nur ein Dokument mit dem Grid und übernimmt den Text nicht. Natürlich habe ich das erstellen des Dokuments aus dem verlinkten Code herausgenommen, sodass nur ein Dokument erstellt wird.
Hat hier jemand einen Ansatz?
Dankeschön.