请教关于RichEdit

Question

1)在下面代码中
begin      //通过工具栏按钮设置字体粗细
    with RichEdit1.SelAttributes do
    if fsBold in Style then
      Style := Style - [fsBold]
    else
    begin
      Style := Style + [fsBold];
       TBbold.Down:=true;
    end;
我知道Style := Style - [fsBold]是把粗变细,Style := Style + [fsBold];是把细变粗,这里的style是什么类型的为什么可以加和减.
2)RichEdit1.CaretPos.Y + 1;中的CaretPos.Y是什么意思.

Answer 1

看一下delphi自带的例子。demo 目录下

Answer 2

1.style是一个集合, TFontStyles = set of TFontStyle;
TFontStyle = (fsBold, fsItalic, fsUnderline, fsStrikeOut);
将style加上[fsBold]相当于将font的bold设为true,减去则相反
2.RichEdit.CaretPos.Y表示的是光标在RichEdit中的相对位置(坐标Y方向),
其实就是表示你的当前光标位于richedit中的第几行,RichEdit.CaretPos.X表示你的光标处处于第几列