如何使用 Delphi 的读写密码创建 .xls 文件

Posted 2023-04-19

【中文标题】如何使用 Delphi 的读写密码创建 .xls 文件

【英文标题】：How can I create an .xls file with a readwrite password from Delphi

【发布时间】：2010-03-28 19:15:49

【问题描述】：

我知道可以使用 ADO 从 Delphi 创建 .xls 文件，使用 Excel 进行 OLE 自动化，甚至使用几个商业库。

我现在的要求不仅是创建一个新的 .xls 文件并向其中添加数据，而且还要使用密码保护它以防编辑。

我想这可以使用 OLE 自动化来实现，但这需要在计算机上安装 Excel，并且还会增加我希望避免的 OLE 自动化的所有潜在麻烦。

是否有任何其他解决方案提供密码保护文件的选项？

（是的，我知道这远非安全，但客户要求这样做。 以防万一：我使用的是 Delphi 2007。）

【参考方案1】：

此页面来自 NativeExcel Suite 的帮助文件： 保护方法

 Protects a workbook so that it cannot be modified.                   

 Syntax     

    procedure       Protect();     
    procedure       Protect(   Password     : string);   

     Password          
                    Optional string. A string that specifies a  
                    case-sensitive   password for the
                    workbook. If this argument is 
                    omitted, you can unprotect the workbook without
                    using a password . Otherwise, you must specify the 
                    password to unprotect the workbook.
  Example       

    This example sets the password for the workbook.       

        workbook.Protect('mypass123');

NativeExcel 对我来说效果很好。