|
在很多情况下都要识别汉字,以下是函数 VString
1 \! U7 C) t) cAnsiString __fastcall TForm1::VString(AnsiString ss)
% r. S/ ]" F G0 S { / M& j: e6 o5 x4 Q% W
AnsiString ass; 0 c( x! m+ b/ L: G
int ii,ll;
9 K- [- D. n" H/ g unsigned char cc;
. p* k. R j Q4 Z. H ass=""; & t) b3 j8 w' v! Q0 u4 s
ll=ss.Length(); ( P/ r! ?5 F7 S& m. a" G* {4 K7 x
for(ii=0;ii<ll;ii++)
) f8 T: j% B/ q& v, U {
- C* z# k$ L4 A0 c) }* D cc=ss.c_str()[ii]; 9 z+ G S5 L- {* ]% ` B B
if(cc>0xa0)
; j0 h, x3 `7 g* y8 Z- I, Y+ ^ {
% d' W: N2 B& K7 q ass=ass+ss.SubString(ii+1,2);
1 _) g+ h# C% q2 d i++; ! y; l) ~( T8 G
} ' h7 f% r4 E5 [3 U/ i0 P3 u) N
else 6 W0 x$ j9 T0 }( A$ m6 U
{
& J- ]* x' m6 b7 M, p: V ass=ass+ss.SubString(ii+1,1);
' }6 \ L: u0 Q2 W5 Q2 I
5 I* b. F+ a: t* J$ B5 c }
# p3 d4 d% p# d* g$ @' r! I" ] }
8 h: x0 x: J% H6 _ return ass;
' X# q) f- d: d} |