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

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

Ошибка при заполнении таблицы данными (Word) [Delphi, Windows]


som ©   (2005-06-06 16:48:00) 

при заполниении таблицы возникает ошибка "Отсутствует доступ к отдельным столбцам, поскольку ячейки таблицы имеют разную ширину"

W:=CreateOleObject('Word.Application');
..........................
W.ActiveDocument.Tables.Item(Table).Columns.Item(Column).Cells.Item(Row).Range.Text:=text;


Попов Виталий   (2006-05-10 23:37:00) [1]

Проще писать
W.ActiveDocument.Tables.Item(Table).Cell(Row, Column).Range.Text := text;
Ошибка  "Запрашиваемый номер семейства не существует" может возникать при попытке записать данные в ячейку таблицы, которой (ячейки) не существует (например при объединении ячеек). Причем, если программа работает с офисом например 97, то в 2000 и ХР уже может и не работать (если сложные таблицы с объединениями, разбиениями ячеек и т.д.) так как нумеруются ячейки в разных версиях Ворда по разному.


Аксель   (2006-05-10 09:06:00) [2]

А чего делать, когда при экспорте StringGrid в таблицу Word, выдает "Запрашиваемый номер семейства не существует"?


Pol   (2005-06-15 18:36:00) [3]

Поменяй местами
W.ActiveDocument.Tables.Item(Table).Rows.Item(Row).Cells.Item(Column).Range.Text:=text;
У меня идет.


YurikGL   (2005-06-06 16:58:00) [4]

ИМХО ставить курсор в ячейку и писать после него

что-то типа такого

WordApplication1.Selection.Start:=число;
WordApplication1.Selection.End_:=число;

w1.selection.insertafter(текст);

число подбирается методом научного тыка :)


Наверх

Титульная страница Поиск, карта сайта Написать письмо