아래와 같이 해서.....
파워포인트 열기는 됐는뎅......
var
pp,XL,PRES:variant;
begin
try
XL := CreateOLEObject('powerpoint.Application');
except
MessageDlg('Powerpoint 이 설치되어 있지 않습니다.',
MtWarning, [mbok], 0);
Exit;
end;
XL.Visible := True;
PRES := xl.Presentations.Open('c:service.ppt',0,-1,-1);
// PRES.Slides(1).Objects.Placeholders(1).Text.Font.Italic := True;
// pp := xl.SlideShowwindow.Run('c:service.ppt',0,-1,-1);
end;
근데... 바로 쇼보기 까지 넘어 가려고 하거든요...
MSDN 에서는
Turning on Slide Shows Automatically
You can also turn on slide show automatically simply by typing:
PRES.SlideShow.Run(ppSlideShowFullScreen)
The other option is:
ppSlideShowWindow
which places the slide show in a resizable window instead of the full screen.
Miscellaneous Methods and Properties
아래처럼 나왔던데... 잘 아뉘 되네요... 방법점 알려주세요...
자동으로 바로 쇼보기(F5) 까지용......
ocx/servers/msppt8.pas 뜯어보고 있는뎅...
쇼보기에 관한건....찾아도 아뉘 보이니....
누가점 알려주세용...