请问用OLE方式怎么打开有密码的PPT？

[adslong]

uses
comobj;

var
OLE, PPT: OleVariant;

OLE := CreateOleObject('PowerPoint.Application');
PPT := OLE.Presentations.Open(S_FileName, False, False, False);
PPT.Close;
OLE.Qiut;

请问怎么打开有密码的PPT，百度了很久也不知道，求指教。

[lyhoo163]

来见过ppt的控件。

[adslong]

就是使用OLE方式，没用控件。