Question

我知道如何在表格的单元格中对齐文本。

但我无法弄清楚如何整个整个桌子中心

我使用以下代码创建表格并设置其边框。

wrdDoc.Tables.Add(wrdSelection.Range,1,1);
wrdDoc.Tables.Item(1).Columns.Item(1).SetWidth(462,wdAdjustNone);
wrdDoc.tables.Item(1).Borders.Item(wdBorderLeft).LineStyle := wdLineStyleDouble;
wrdDoc.tables.Item(1).Borders.Item(wdBorderRight).LineStyle := wdLineStyleDouble;
wrdDoc.tables.Item(1).Borders.Item(wdBorderVertical).LineStyle := wdLineStyleNone;
wrdDoc.tables.Item(1).Borders.Item(wdBorderTop).LineStyle := wdLineStyleDouble;
wrdDoc.tables.Item(1).Borders.Item(wdBorderBottom).LineStyle := wdLineStyleDouble;
wrdDoc.tables.Item(1).Borders.Item(wdBorderHorizontal).LineStyle := wdLineStyleNone;

如何将表格属性设置为对齐中心？

注意：我确实发现下面的页面应该在microsoft的网站上有示例代码，但它没有任何价值。

http://msdn.microsoft.com/en-us/library/office/ff834583(v=office.14).aspx

任何帮助将不胜感激。谢谢

Answer 1

我终于得到了http://www.delphigroups.info/2/da/258008.html

的答案

所需的代码是wrdDoc.tables.Item(1).Rows.Alignment := wdAlignRowCenter;

但无论如何，谢谢你们。

如何将MS Word表格与中心对齐使用delphi XE 5

1 个答案: