delphi - 更新许多项目以使用通用的VCL样式

Question

我被要求提供一种更新我们的应用程序并将VCL样式添加到所有组件的方法。

该应用程序由许多不同的程序（超过200个）组成，因此手动更新每个程序将是一项漫长而繁琐的任务。

所以我想知道是否有一种方法可以更新所有这些项目，以便每个项目都使用相同的VCL样式？目前，根本没有应用任何样式。

Answer 1

如果计划将VCL样式支持添加到大量项目中，则必须构建自定义工具或脚本，请尝试以下选项。

选项1，将VCL样式作为资源嵌入exe中：使用此选项，您需要每个项目至少修改2个文件，.dpr文件（用于设置当前VCL样式）和.dproj文件，需要对VCL的引用样式文件，将样式作为资源嵌入。

选项2，使用来自外部文件的VCL样式，使用此选项，您需要修改.dpr文件，该文件设置当前的VCL样式，并添加必要的代码以从外部文件加载样式。

要修改.dproj文件，可以使用支持XML的自动化工具或脚本语言。

为了修改.dpr文件，您需要理想地使用DelphiAST或Castalia-Delphi-Parser之类的Delphi解析器来构建自定义应用程序，并添加必要的代码来设置当前的VCL样式。