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

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

Ворд. Макрос. При ворд=visible работает, а в фоне нет. [Delphi, Windows]

Andy BitOff ©   (2006-02-14 13:57:00) 

Здравствуйте.
Такая ситуация. Есть таблица (47 колонок), добавляю в конец строку и заполняю. По достижении некоего места надо добавить строку, объединить ячейки, внести текст и продолжить дальше как и в начале.
Делаю следующее, при достижении ЭТОГО места (где надо объединить), добавляю две строки и далее так:

WordApp.Selection.Move(wdRow,-1);
//
WordApp.Selection.SelectRow;
WordApp.Selection.Cells.Merge;
WordApp.Selection.Font.Bold:=True;
WordApp.Selection.ParagraphFormat.Alignment:= wdAlignParagraphLeft;
WordApp.Selection.Text:='text';
//
WordApp.Selection.Move(wdRow,1);

Если ворд отобажается, т.е. открыт и работа идет в визуальном представлении, все проходит на ура, а если ворд открыт в фоне (wordapp.visible:=False;), то вообще никак не отрабатывают строки ограниченные коментами.
Не подскажите, в чем может быть дело?
Отвечу на любые вопросы.
Зарание спасибо.

---

Andy BitOff   (2006-02-14 18:58:00) [1]

Спасибо, завтра попробую.

---

umbra   (2006-02-14 17:26:00) [2]

точно сказать нельзя, так как неизвестно что с чем происходит. Но вот пример, как можно работать без Selection. mydoc здесь- документ ворд

var
 mytable, myrange: variant;

myrange := mydoc.Content;
myrange.Collapse(wdCollapseEnd);
mytable := mydoc.Tables.Add(myrange, 3, 4);//вставляем таблицу 3х4 в конец документа
mytable.Rows.Add;//добавляем строку в конец таблицы
mytable.Rows[mytable.Rows.Count].Cells.Merge;//объединяем все ячейки в последней строке
mytable.Rows[mytable.Rows.Count].Cells[1].Range.InsertAfter('merged cells');//вставляем в объединенную ячейку текст

---

Andy BitOff   (2006-02-14 16:07:00) [3]

А нельзя ли показать как бы выглядел код, приведенный мной выше, с учетом ваших уточнений?

---

umbra   (2006-02-14 14:03:00) [4]

если ворд не виден, то пользоваться свойством Selectionне стоит, глюки могут быть самые странные. лучше пользоваться соответствующими коллекциями и диапазонами ( Range)

---

Наверх