|
在很多情况下都要识别汉字,以下是函数 VString
: V* B$ e d; ?( g* bAnsiString __fastcall TForm1::VString(AnsiString ss)
# m9 b9 M. F/ n M$ n( L# V {
! P& d i. k$ f% L* P& K% ?# j AnsiString ass; % Y- i: ~4 c$ d" Y
int ii,ll; % q3 E! y7 _3 @+ @, {9 Z7 w
unsigned char cc;
8 m- U) K# X+ W) M5 _ ass=""; 7 E( f3 i" ?( T/ M+ O
ll=ss.Length();
5 d& q1 }0 R. T% R6 N8 B' F for(ii=0;ii<ll;ii++) : }. {) L" V) {9 F& x4 F/ {7 S
{
! ~- }' f7 {# Y& V3 o" e cc=ss.c_str()[ii]; 4 Y& b$ N3 f" X8 x
if(cc>0xa0) 1 ?9 C; I% ]6 n
{ ! E1 z$ d0 y+ z; I' _, z) ?4 ]' A
ass=ass+ss.SubString(ii+1,2);
7 T2 S1 d9 m- u ^ i++; " o- [/ z9 k1 {6 x9 l. g0 E
} 9 Y( h i8 I& Z8 z
else 4 \$ B7 W, F; E A
{
+ z h4 R1 W% I# _ a. Q ass=ass+ss.SubString(ii+1,1);
. ]$ ~+ ]( r4 z* }2 x/ E
' _, i+ k1 W2 R } * {! {7 b# A1 A; i9 r3 s" n
} ! E; c5 l5 H( v" l0 F4 P
return ass; 9 J. C/ |2 l, h
} |