Скачать: CL | DM;

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

← →
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 такое свойство

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

---

← →
umbra ©   (2006-10-27 11:32) [5]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c