Помогите с Powerpoint

[Ruster]

Напишите мне как вставить в прогу презентацию Powerpoint , и если можно без использования OLE , а то я не очень понимаю что это и где взять)

 

[zubr]

1. Без COM-технологий все равно не получится.
2. Как вариант решения - программно, используя COM-объектную модель PowerPoint, сохраняешь презентацию в Web-формате и отображаешь ее в TWebBrowser. Работают все фишки презентации (звук, анимация), кроме видео.
3. Делал компонент - окно отображающее презентацию. Он коммерческий, бесплатно не отдам.

 

[Ruster]

Ну ладно буду делать как видео-файл, подскажите ещё как прогу на полный экран(а то я не знаю как сделать чтобы пуск не видно было)
И второе: как изображение-фона растянуть во весь экран?

 

[zubr]

Для полноэкранного режима:

 Left := 0;
Top := 0;
Width := Screen.Width;
Height := Screen.Height;
ShowWindow(FindWindow('Shell_TrayWnd', nil), SW_HIDE);

Для возврата трея:

ShowWindow(FindWindow('Shell_TrayWnd', nil), SW_SHOW);