如何修改添加删除报表控件样式，实现个性化定制？

本文共计417个文字，预计阅读时间需要2分钟。

FastReport VCL是一个用于Delphi、C++Builder、RAD Studio和Lazarus的VCL库，用于创建报告和文档。它提供可视化模板设计器，支持30多种格式，并能部署到云端、网站、电子邮件和打印。

FastReport VCL是用于 Delphi、C++ Builder、RAD Studio 和 Lazarus 的报告和文档创建 VCL 库。它提供了可视化模板设计器，可以访问 30 多种格式，并可以部署到云、网站、电子邮件和打印中。

修改具有给定名称的样式：

Pascal:

var
Style: TfrxStyleItem;
Styles: TfrxStyles;

Styles := frxReport1.Styles;

{ search for a style}
Style := Styles.Find('Style1');

{ modify the font size }
Style.Font.Size := 12;

C++：

TfrxStyleItem * Style;
TfrxStyles * Styles;

Styles = frxReport1->Styles;

// search for a style
Style = Styles->Find("Style1");

// modify the font size
Style->Font->Size = 12;

向报表样式集添加样式：
Pascal:

var
Style: TfrxStyleItem;
Styles: TfrxStyles;

Styles := frxReport1.Styles;

{ add }
Style := Styles.Add;
Style.Name := 'Style3';

C++：

TfrxStyleItem * Style;
TfrxStyles * Styles;

Styles = frxReport1->Styles;

// add
Style = Styles->Add();
Style->Name = "Style3";

删除具有给定名称的样式：
Pascal:

var
Style: TfrxStyleItem;
Styles: TfrxStyles;

Styles := frxReport1.Styles;

{ delete }
Style := Styles.Find('Style3');
Style.Free;

C++：

TfrxStyleItem * Style;
TfrxStyles * Styles;

Styles = frxReport1->Styles;

// delete
Style = Styles->Find("Style3");
delete Style;

修改完成后，应该调用该Apply方法：

{ use modifications }
frxReport1.Styles.Apply;

如果您对FastReport 动物，欢迎加入FastReport QQ 交流群：702295239