richedit有一个属性是:selAttribute可以设置选中文本的字体,但是必须要线设置richedit.selstart,richedit.sellength

解决方案 »

  1.   

    一个小例子。
        Rich.lines.add('12214321423545435663546');
        Rich.lines.add('afjkwojeejwfajflsdfjdsfd');
        Rich.SelStart:=1;
        Rich.SelLength:=10;
        Rich.SelAttributes.Style := [fsBold];
        Rich.SelStart:=Length(Rich.Text);
        Rich.SelAttributes.Style := [fsBold];
      

  2.   

    一个小例子。
        Rich.lines.add('12214321423545435663546');
        Rich.lines.add('afjkwojeejwfajflsdfjdsfd');
        Rich.SelStart:=1;
        Rich.SelLength:=10;
        Rich.SelAttributes.Style := [fsBold];
        Rich.SelAttributes.color:=clred;
      

  3.   

    你如果很急的话,何不看看Delphi6\Demos\richedit下的那个程序,说不定可将
    它的代码直接Copy到你程序中用