Forum: Object-Pascal / Delphi-Language
Delphi
by little_budda,
18. Mai 2008
Also, die Variante mit Items klappt leider auch nicht so recht.
Mit
vWordTable.Columns.items(1).PreferredWidthType := 3; // wdPreferredWidthPoints = 3
vWordTable.Columns.items(1).PreferredWidth := 113; // 4.0 cm
kommt folgend Fehlermeldung:
Die Methode 'Items' wird vom Automatisierungsobjekt nicht unterstützt
Forum: Object-Pascal / Delphi-Language
Delphi
by little_budda,
18. Mai 2008
Klasse Idee mit dem Makro.
Klappt auch schon einiges.
Ich habe nun versucht folgenden VBA CODE
Selection.Tables(1).Columns(1).PreferredWidthType = wdPreferredWidthPoints
Selection.Tables(1).Columns(1).PreferredWidth = CentimetersToPoints(4)
in Delphi umzusetzten
Forum: Object-Pascal / Delphi-Language
Delphi
by little_budda,
17. Mai 2008
Hallo,
ich nutze folgenden Code um eine Tabelle in einem Word Dokument anzulegen und zu füllen.
...
// Tabelle einfügen
vWordTable := vWordInstanz.Selection.Tables.Add(vAktiveDocument.Range, StringGridDaten.RowCount, StringGridDaten.ColCount);
// Daten aus dem Stringrid eintragen
for iRow := 1 to StringGridDaten.RowCount do
begin