1. Получи 30.000 рублей. Для получения денег необходимо принять участие в конкурсе авторов codeby. С условиями и призами можно ознакомиться на этой странице ...

    Внимание! Регистрация авторов на конкурс закрыта.

    Скрыть объявление
  2. Требуются разработчики и тестеры для проекта codebyOS. Требования для участия в проекте: Знание принципов работы ОС на базе Linux; Знание Bash; Крайне желательное знание CPP, Python, Lua; Навыки системного администрирования. Подробнее ...

    Скрыть объявление

Помогите с Powerpoint

Тема в разделе "Delphi - программирование", создана пользователем Ruster, 7 фев 2009.

  1. Ruster

    Ruster Member

    Репутация:
    0
    Регистрация:
    7 фев 2009
    Сообщения:
    6
    Симпатии:
    0
    Напишите мне как вставить в прогу презентацию Powerpoint , и если можно без использования OLE , а то я не очень понимаю что это и где взять)
     
  2. zubr

    zubr Гость

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

    Ruster Member

    Репутация:
    0
    Регистрация:
    7 фев 2009
    Сообщения:
    6
    Симпатии:
    0
    Ну ладно буду делать как видео-файл, подскажите ещё как прогу на полный экран(а то я не знаю как сделать чтобы пуск не видно было)
    И второе: как изображение-фона растянуть во весь экран?
     
  4. zubr

    zubr Гость

    Репутация:
    0
    Для полноэкранного режима:
    Код:
     Left := 0;
    Top := 0;
    Width := Screen.Width;
    Height := Screen.Height;
    ShowWindow(FindWindow('Shell_TrayWnd', nil), SW_HIDE);
    Для возврата трея:
    Код:
    ShowWindow(FindWindow('Shell_TrayWnd', nil), SW_SHOW);
     
Загрузка...

Поделиться этой страницей