Modification/adding/deleting of a styles set
Modification of a set with the specified name:
var
Styles: TfrxStyles;
StyleSheet: TfrxStyleSheet;
{ search for the required set }
Styles := StyleSheet.Find('Styles2');
{ modify a style with the Style1 name from the found set }
with Styles.Find('Style1') do
Font.Name := 'Arial Black';
Adding a set to a library:
var
Styles: TfrxStyles;
StyleSheet: TfrxStyleSheet;
{ the third set }
Styles := StyleSheet.Add;
Styles.Name := 'Styles3';
Deleting a set from a library:
var
i: Integer;
StyleSheet: TfrxStyleSheet;
{ search for the third set }
i := StyleSheet.IndexOf('Styles3');
{ if find, delete }
if i <> -1 then
StyleSheet.Delete(i);