Power Point

[lenivec]

Подскажите пожалуйста как при помощи нажатия на кнопочку в дельфи просмотреть приложение Power Point (т.е. открыть приложение и нажать F5)

[Snoopy]

Почитай про работу с OLE/COM

uses comobj;
var
  PowerPoint: OLEVariant;
begin
    PowerPoint := CreateOleObject('PowerPoint.Application');
    PowerPoint.Visible := True;
    PowerPoint.Presentations.Open('c:\1.ppt', False, False, True);
    PowerPoint.ActivePresentation.SlideShowSettings.Run;
    PowerPoint.ActivePresentation.SlideShowWindow.View.Next;
end;

[lenivec]

а код рабочий?
p.s. спасибо за помощь

[Snoopy]

а код рабочий?

Абсолютно рабочий!

[lenivec]

криворукость-моя главная беда) спасибо, вроде запахало!!!!!!!!!!!

[nikolya]

если при добавлении звука из файла на тек.слайд в POWER POINT видается ошбка mci??

[I3eNDeR]

Люди добрые, может кто знает как сделать так, что бы не нужно было прописывать путь к презентации целеком (с:\... и т.д.)? Пмогите пожалуйста!

[CraftR14]

Сообщение от I3eNDeR

Люди добрые, может кто знает как сделать так, что бы не нужно было прописывать путь к презентации целеком (с:\... и т.д.)? Пмогите пожалуйста!

хз, копируй копируй к себе в папку (рядом с прогой) и указывай простo '1.ppt'

[I3eNDeR]

Сообщение от CraftR14

хз, копируй копируй к себе в папку (рядом с прогой) и указывай простo '1.ppt'

Не работает, открывает сам powerpoint но не презентацию(((

[ZeRRn]

Не работает, открывает сам powerpoint но не презентацию(((

Попробуйте указать не просто '1.ppt', a ExtractFilePath(Application.ExeName ) + '1.ppt' , при наличии презентации в директории с программой соответственно...