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