| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как в ячейке таблицы указать горизонтальное выравнивание? [D6, 2000, XP]

Mishenka ©   (2006-10-27 10:06:00) 

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

---

umbra   (2006-10-27 11:32:00) [1]

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

---

Mishenka   (2006-10-27 10:57:00) [2]


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

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

---

Anatoly Podgoretsky   (2006-10-27 10:22:00) [3]

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

---

Mishenka   (2006-10-27 10:19:00) [4]

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

---

Anatoly Podgoretsky   (2006-10-27 10:12:00) [5]

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

---

Наверх