RichView TRVStyle ParaStyles

RichView TRVStyle ParaStyles
  
    一、ParaStyles
    这是TRVStyle的关键属性之一:段落样式的集合。   
    ParaSytle定义了段落属性，ParaSytle是 TParaInfos的集合，TParaInfo是TCustomRVParaInfo的子类，继承关系TObject → TPersistent → TCollectionItem → TCustomRVInfo

property ParaStyles : TParaInfos;

    它是段落样式，用来定义文档中的段落属性。

参见：
TParaInfos (collection of paragraph styles);
TParaInfo (item in collection of paragraph styles).

    二、ITEM
    在TRVStyle中，ParaStyles以ParaStyles[0]形式存在。如：ParaStyles[0]，就是集合中的第一个文本样式。ParaStyles[N]  其中N的值  0..n-1。

    三、属性
    Alignment                       //  段落进行对齐，Type TRVAlignment; 
    LastLineAlignment         //  下一行段落进行对齐,Type TRVLastLineAlignment;
    FirstIndent                     //  段落第一行的缩进，用LeftIndent进行总结;
    LeftIndent                      //  左边缘缩进; 使用TRVStyle的单位；     
    RightIndent                    //  右边缘的缩进;
    SpaceBefore                 //  段落上方间隔;
    SpaceAfter                    //  段落下方的空格;
    Border                           //  段落周围的边框;      TRvBordes
    Background                  //  段落背景;
    Tabs                              //  制表位的集;
    LineSpacing                  //  行间距;   
    BiDiMode                     //  默认文本方向;
    Options                        //  保护，包装
    OutlineLevel                //  允许定义标题。

    四、相关属性
    1、LineSpacingType
TRvLineSpacingType(rvlsPercent,rvlsSpaceBetween,rvlsLineHeightAtLeast,rvlsLineHeightExact)
    
    2、TRVAlignment
type
  TRVAlignment = (rvaLeft, rvaRight, rvaCenter, rvaJustify, rvaDistribute);
rvaLeft       段落向左对齐。
rvaRight      段落向右对齐。
rvaCenter     段落居中。
rvaJustify    段落的所有行(除了最后一行)通过在字与字之间增加空格(即增加空格字符的宽度)来左右对齐。
              最后一行根据LastLineAlignment属性进行对齐。
rvaDistribute 段落的所有行(除了最后一行)通过在所有字符之间添加空格左右对齐。
              最后一行根据LastLineAlignment属性进行对齐。

    3、TRVLastLineAlignment
type
  TRVLastLineAlignment =(rvllaDefault, rvllaLeft, rvllaRight, rvllaCenter, rvllaJustify);

rvllaDefault   如果段落从左到右对齐，则行向左对齐，否则行向右对齐。
rvllaLeft      这条线向左对齐。
rvllaRight     这条线向右对齐。
rvllaCenter    这条线居中。
rvllaJustify   该行根据“对齐”属性进行对齐。

     4、Bordes

type
  TRVBorderStyle = (rvbNone, rvbSingle, rvbDouble, rvbTriple,rvbThickInside, rvbThickOutside);
       rvbNone         无边界r
       rvbSingle       简单
       rvbDouble       双线
       rvbTriple       三线
       rvbThickInside  粗线
       rvbThickOutside 外部粗线
相关设置：  

Border.Color                                //  颜色  
Border.Width                                //  宽   
Border.InternalWidth                    //  内部宽度  
Border.Style                                //  框内类型           
Border.VisibleBorders.Left          //  是否显示左框
Border.VisibleBorders.Top
Border.VisibleBorders.Right
Border.VisibleBorders.Bottom
Border.BorderOffsets.Left           //  段落内容和边框之间的间距。
Border.BorderOffsets.Top
Border.BorderOffsets.Right
Border.BorderOffsets.Bottom

    五、ParaStyles默认值
    TRVStyle中，ParaStyles默认值（2个）：
Paragraph Style   //  段落样式
Centered          //  中心的

   六、建立自己的ParaStyles

  RVStyle1.ParaStyles.Clear;
  with RVStyle1.ParaStyles.Add do begin
    StyleName := 'Paragraph 1';
    Alignment := rvaLeft;                  //  段落进行对齐( left, right, center, justify or distribute)
    LastLineAlignment:=rvaLeft;            //  下一行段落进行对齐（左对齐，右对齐，居中对齐，对齐或分配);
    FirstIndent:=0;                        //  段落第一行的缩进
    LeftIndent:=0;                         //  左边缘缩进;
    RightIndent:=0;                        //  右边缘的缩进;
    SpaceBefore:=5;                        //  段落上方间隔;
    SpaceAfter:=5;                         //  段落下方的空格;
    Border:=：bsNone;                      //  无边框
  end; 
  with RVStyle1.ParaStyles.Add do begin
    StyleName := 'Paragraph 2';
    Alignment := rvaCenter;                //  段落进行对齐( left, right, center, justify or distribute)
    LastLineAlignment:=rvaLeft;            //  下一行段落进行对齐（左对齐，右对齐，居中对齐，对齐或分配);
    FirstIndent:=0;                        //  段落第一行的缩进
    LeftIndent:=0;                         //  左边缘缩进;
    RightIndent:=0;                        //  右边缘的缩进;
    SpaceBefore:=5;                        //  段落上方间隔;
    SpaceAfter:=5;                         //  段落下方的空格;
    Border.Style:=rvbSingle;               //  有边框
    Border.VisibleBorders.Top:=True;       //  边框是否显示
    Border.VisibleBorders.Left:=False;
    Border.VisibleBorders.Right:=False;
    Border.VisibleBorders.Bottom:=True;
  end;