如何在自己的窗扣内载入并且显示一个ppt文件内容？？？谢谢赐教！(100)

如何在自己的窗扣内载入并且显示一个ppt文件内容？？谢谢赐教！

ole

mazheng? 只是显示吗?

对 就是在一个form窗口里播放ppt文件 应该如何实现啊 谢谢

网上说要用到DSOFramerControl控件 ?好像用VBA，有人实现过？

unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, OleCtnrs;type TForm1 = class(TForm) btn1: TButton; olcntnr1: TOleContainer; // 组件在 System 页 procedure btn1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.dfm}procedure TForm1.btn1Click(Sender: TObject);begin with TOpenDialog.Create(nil) do try if Execute then begin olcntnr1.CreateObjectFromFile(FileName, False);// olcntnr1.LoadFromFile(FileName); end; finally Free; end;end;end.可以显示

TOleContainer;如何滚动显示ppt文件 ？ 谢谢

这个我就没去研究了~, 呵呵