Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: ActiveX/СОМ/CORBA > Не открывается файл Powerpoint

Автор: Mick Winder 10.2.2005, 18:41

Написал такой кодик:
App.Presentations.Open('E:\TablToPwPt\test.ppt');
Выдает сообщение об ошибке:
Presentations.Open: Invalid request The PowerPoint Frame windows does not exist
Не могу понять, в чём дело? Посмотрел в TLB, вроде всё правильно...
Вот так и спотыкаюсь на каждой фигне...

Автор: <Spawn> 13.2.2005, 07:47

Нужно видимость окну установить:)

Код


procedure TForm1.Button6Click(Sender: TObject);
var
  PowerPoint: OleVariant;
begin
  PowerPoint := CreateOleObject('PowerPoint.Application');
  try
    PowerPoint.Visible := True;
    PowerPoint.Presentations.Open(ExtractFilePath(ParamStr(0)) + '1.ppt');
  finally
    PowerPoint := Unassigned;
  end;
end;