摘要: wwriched.pas找到如下方法,注释如下语句,直接返回truefunction TwwCustomRichEdit.CanCut: boolean;begin //result:= seltext<>''; Mike remove; result := true;end; 阅读全文
posted @ 2009-08-29 10:57 毛小毛 阅读(286) 评论(0) 推荐(0) 编辑
摘要: FASTREPORT中MEMO的wordwrap设为True,使文本自动换行,但当最后一个字为中文时总是出现乱码。怎样才能使最后的字为中文且剩下文本区不足两格时自动换行,避免出现乱码?主要改fr_class.pas中的wrapline过程,其中有一段:else if s[last] = thenOutLine(Copy(s, beg, last - beg)) elseOutLine(Copy(s... 阅读全文
posted @ 2009-08-29 10:51 毛小毛 阅读(4161) 评论(0) 推荐(0) 编辑