用OleContainer打开EXCEL文件，如何让其为只读，不可复制粘贴等操作 ( 积分: 100 )

A

anlon-gsb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-16

• #1

如题，（不要改变文件的属性为只读，有人提过这样的方法）；只能查看，其他任何操作功能都被禁止；
OleContainer打开WORD文档的只读属性已经实现，如下代码:
//控制文档为只读
OleContainer1.OleObject.application.ActiveDocument.Protect(2);

 

D

delhpi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-16

• #2

Xl.Cells.Select;//Select All Cells
Xl.Selection.Locked = True;// Lock Selected Cells //

 

A

anlon-gsb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-16

• #3

楼上的方式不太理想，被锁定的表格无法滚动浏览数据

 

A

anlon-gsb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-16

• #4

贴出代码如下：
OleContainer1.CreateObjectFromFile('D:/20060828.xls',false);
OleContainer1.DoVerb(ovShow);

 

A

anlon-gsb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-16

• #5

自己顶了！

 

A

anlon-gsb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-07-01

• #6

问题已解决，请大家接分吧