초보입니다..
파워포인트 파일을 불러서 뜨우려고 하는데요.....
ole객체를 써서 뜨우려고 합니다..
근데 잘안돼요...
고수님덜의 지도 부탁드립니다..
try
PowerPointApplication1.Connect;
except
messagedlg('파워포인트 프로그램이 존재하는지 점검하세요.', mtWarning,[mbYes], 0);
raise;
exit;
end;
msppt := CreateOleObject('PowerPoint.Application');
msppt.Visible := True; // 엑셀 프로그램이 보이게 한다.
msppt.Slides.Add(F_Path+Fname); // 특정화일을 open한다.
end;
파워포인트는 Presentations객체가지고 파일작업을 하셔야 해요...
var
FileName: string;
OlePpt: OleVariant;
Presentation: OleVariant;//PowerPointPresentation;
begin
CoInitialize(nil);
OlePpt := CreateOleObject('Powerpoint.Application');
OlePpt.Visible := True;
FileName := 'C:powerpnt.ppt';
Presentation := OlePpt.Presentations.Open(FileName, 0, -1, -1);
......
end;
^^ 항상 즐코하세요...