Как в ячейке таблицы указать горизонтальное выравнивание?

← →
Mishenka (2006-10-27 10:06) [0]

Добавил таблицу в документ ворд. С вертикальным выравниванием проблем нет, просто указываю Table.Cell(1, 1).VerticalAlignment := 1, а вот если указать HorizontalAlignment, то пишет, что таклго метода нету.
Как в ячейке указать горизонтальное выравнивание?

← →
Anatoly Podgoretsky © (2006-10-27 10:12) [1]

Скопировано из рабочей программы HorizontalAlignment

← →
Mishenka (2006-10-27 10:19) [2]

Указываю Table.Cell(1, 1).HorizontalAlignment := 1;
пишет Method "HorizontalAlignment" not supported by automation object

← →
Anatoly Podgoretsky © (2006-10-27 10:22) [3]

Тут сразу возникает много вопросов
1. что такое Table
2. что такое Cell у него и есть ли у этого Cell такое свойство

← →
Mishenka (2006-10-27 10:57) [4]

procedure TForm1.Button1Click(Sender: TObject); var W, Table, Range, Cell: variant; begin W := CreateOleObject("Word.Application"); W.Documents.Add; W.ActiveDocument.Range.Font.Size := 14; Table := W.ActiveDocument.Tables.Add(Range := W.ActiveDocument.Range, NumRows := 1, NumColumns := 5); Table.Cell(1, 1).VerticalAlignment := 1; Table.Cell(1, 1).HorizontalAlignment := 1;

> 2. что такое Cell у него и есть ли у этого Cell такое свойство

Ну видимо такого свойства нету. Но что тогда делать?

а макрос не судьба записать и посмотреть?
Table.Cell(1, 1).Cell.Range.ParagraphFormat.Alignment := wdAlignParagraphCenter;

Как в ячейке таблицы указать горизонтальное выравнивание? Найти похожие ветки