|
|
|
Регистрация Восстановить пароль |
|||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
Опции темы | Поиск в этой теме |
27.11.2012, 22:10
|
#1 |
|
Новичок
Джуниор
Регистрация: 27.11.2012
Сообщений: 2
|
Автоматизация PowerPoint
Здравствуйте!
Поправьте в чём ошибка? Из Delphi 7, редактирую шаблон презентации (использую ComObj), с дополнением текстового поля всё получается: PowerPointApp.Presentations.Item(1) .Slides.Item(1).Shapes.Item(2) .TextFrame.TextRange.Characters(Sta rt:=64, Length:=0).Text:='текст'; пустая ячейка таблицы выделяется: PowerPointApp.Presentations.Item(1) .Slides.Item(1).Shapes.Item(3) .Table.Cell(2, 2).Select; но не получается вставить текст в эту ячейку, ругается на "TextRange". PowerPointApp.Presentations.Item(1) .Slides.Item(1).Shapes.Item(3).Tabl e.Cell(2, 2).TextRange.Text:='текст'; В чём причина? 
|
|
|
|
02.12.2012, 23:03
|
#2 |
|
Новичок
Джуниор
Регистрация: 27.11.2012
Сообщений: 2
|
|
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| PowerPoint | Alter1989 | Мультимедиа в Delphi | 3 | 17.06.2011 00:31 |
| PowerPoint | WizarD.89 | Microsoft Office Excel | 0 | 08.06.2011 08:39 |
| PowerPoint | женя2010 | Microsoft Office Excel | 0 | 21.06.2010 17:57 |
