可怜可怜我吧！如何改变TEdit或TRichEdit里面所选定的文字的字体。。

如题！不是改变颜色，是改变字体(控制面板-->字体里面有的)！TRichEdit.Lines.Add()是不是每次只能添加255个字符啊？

解决方案 »

  1.   

    edit1.Font.Name := '@方正舒体';   ？？？？
    这个意思吗？
      

  2.   

    在RichEdit中设置DefAttributes，字体字号都可以改变，只对SelText有效。
    在Memo中直接设置Memo.Font就行了。
      

  3.   

    上文有点问题，DefAttributes，对刚输入的文字格式设置有效，SelAttributes对选中的字体格式有效。
      

  4.   

    程序中可加入
    edit1.font.charset:=GB2312_CHARSET;
    value可自己设
    如果想运行中改，那么加入控件TFontDialog，设置button，onclick为
    if FontDialog1.Execute then begin
        
        Edit1.Font := FontDialog1.Font;
        
        
    end;
    就可以再运行中点button修改字体了
      

  5.   

    选中edit,然后设置其font属性就可以了
      

  6.   

    选中edit,然后设置其font属性就可以了
    是
      

  7.   

    TEdit 里改变个别选中的字的字体是不可能的.除非你自己重写个控件.RechEdit如SUNWARE所述