RichView TRVStyle TextStyles

RichView  TRVStyle TextStyles

    一、TextStyles
    这是TRVStyle的一个关键属性:文本属性(样式)的集合。

    TextStyle定义了字体以及其他文本特性。

proerty TextStyles : TFontInfos;

     TextSytle是 TfontInfo的集合，TfontInfo是TCustomRVFontInfo的子类，继承关系TObject → TPersistent → TCollectionItem → TCustomRVInfo → TCustomRVFontInfo
     

    二、ITEM
    在TRVStyle中，TextStyles以TextStyles[n]形式存在。如：TextStyles[0]，就是集合中的第一个文本样式。TextStyles[n]的N值0..n-1。
    默认换页后颜色带入下一页，在HTML文件(D3+)中包含这种风格的字符集保存语言信息;
    在某些情况下，该样式被用作默认样式，所以建议将其用作普通文本的样式;请不要将rvprDoNotAutoSwitch设置为保护模式;
    这种风格可以用在超文本上，但不推荐。

    三、属性
    StyleName           // 样式名称 
    FontName            // 字体名称;
    Size                     // 字体大小
    DoubleSize          // 双倍字体大小;
    Color                    // 文本颜色;
    Style;                    // 文本样式(粗体，斜体，下划线，删除线)(bold, italic, underline, strikeout);
    Charset                 // 字体字符集(用于非unicode文本样式)。
    BackColor            // 文本背景颜色;
    UnderlineColor      // 下划线颜色;
    UnderlineType       // 下划线样式(normal、double、虚线等);

    四、相关属性
    1、Style
type  TFontStyle = (fsBold, fsItalic, fsUnderline, fsStrikeOut);
type  TFontStyles = set of TFontStyle;

    2、UnderlineType
type
  TRVUnderlineType = (rvutNormal, rvutThick, rvutDouble,rvutDotted, rvutThickDotted,
    rvutDashed, rvutThickDashed,
    rvutLongDashed, rvutThickLongDashed,
    rvutDashDotted, rvutThickDashDotted,
    rvutDashDotDotted, rvutThickDashDotDotted);
end;

    3、Charset
    为样式的文本指定字符集。
property Charset: TRVFontCharset;
    由于TRichView中的所有文本都以Unicode格式存储，因此在绘制文本时不使用该字符集(但在一些执行ANSI↔Unicode转换的方法中仍然使用该字符集，以确定该风格文本的代码页(语言))。然而，强烈建议在使用符号字体(如“symbol”，“Wingdings”，“Webdings”)时指定SYMBOL_CHATSET。
    注意:该属性在FireMonkey版本中存在，但不用于绘制文本。
    默认值: DEFAULT_CHARSET

    五、TextStyles默认值
    TRVStyle中，TextStyles默认值（6个）：
Normal text        // 正常的文本
Heading             // 标题
Subheading        // 副标题
Keywords           // 关键字 
Jump 1               // 超文本1
Jump 2               // 超文本2    

    六、建立自己的TextStyles
 

  RVStyle1.TextStyles.Clear;
  with RVStyle1.TextStyles.Add do begin
    StyleName := 'Normal Text';
    FontName:='宋体';         // 字体名称;
    Size:=11;                 // 字体大小
    DoubleSize                // 双倍字体大小;
    Color:= clBlack;          // 文本颜色;
    Style:=[];                // 文本样式(粗体，斜体，下划线，删除线)(bold, italic, underline, strikeout);
//    Charset:=;            // 字体字符集(用于非unicode文本样式)。
//    BackColor:=clRed;      // 文本背景颜色;
//    UnderlineColor:=;      // 下划线颜色;
//    UnderlineType:=;       // 下划线样式(TRVUnderlineType）；
  end;
  with RVStyle1.TextStyles.Add do begin
    StyleName := 'Heading 1';
    FontName:='黑体';         // 字体名称;
    Size:=16;                 // 字体大小
    DoubleSize                // 双倍字体大小;
    Color:= clBlack;          // 文本颜色;
    Style:=[fsBold]           // 文本样式(粗体，斜体，下划线，删除线)(bold, italic, underline, strikeout);
  end;
  with RVStyle1.TextStyles.Add do begin
    StyleName := 'Heading 2';
    FontName:='宋体';         // 字体名称;
    Size:=14;                 // 字体大小
    DoubleSize                // 双倍字体大小;
    Color:= clBlack;          // 文本颜色;
    Style:=[];                // 文本样式(粗体，斜体，下划线，删除线)(bold, italic, underline, strikeout);
  end;