解决ExpressSpreadSheet 中文乱码问题[备查]

cxSpreadSheet和F1Book等都提供了类似Excel的操作， 但是相比F1Book, cxSpreadSheet的中文支持还不是很完善。在设置了wordbreak为true的时候，里面的中文经常出现乱码。 下面是解决的方法：

修改cxSSPainterWrapper 单元的函数

procedure TcxCanvasWrapper.SplitToTextBricks(const AText: TcxString; ARect: TRect;

HAlign: TcxHorzTextAlign; VAlign: TcxVertTextAlign; var ATextBricks: TWordExtents);

中的ScanWord函数, 在如下代码

if (I > BreakPos) and (Count > 1) then

begin

Dec(Count);

Dec(EndPos);

end;

后面加上下面的代码。

if ByteType(AText, startPos + Count -1) = mbLeadByte then begin ·Dec(Count); ·Dec(EndPos); end; 其实很简单，只要判断一下是否是半个汉字。

本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/raider98/archive/2008/09/07/2896296.aspx