|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Прокрутка презентации Power Point на форме через OLE контейнер
Здравствуйте.
Подскажите, пожалуйста, как работать с powerpoint в delphi через Olecontainer? мне нужно, чтоб на форме запустилась презентация, и слайды сами менялись. Я уже написал частично код, но у меня появляется только первый слайд в верхнем левом углу контейнера. И не сменяется следующим. Код:
procedure TForm1.N21Click(Sender: TObject); begin OleContainer1.Visible := true; OleContainer1.CreateObjectFromFile('c:\pr.ppt',false); OleContainer1.DoVerb(ovShow); OleContainer1.Run; end; Заранее спасибо. |