|
在很多情况下都要识别汉字,以下是函数 VString 7 q4 M+ W9 o8 \1 k( E- u
AnsiString __fastcall TForm1::VString(AnsiString ss)
9 Q1 l1 s* l0 f3 m( h0 b2 Q { ) Z# q% b" f, U! S1 {
AnsiString ass;
! Z t9 l0 C2 J6 S" y8 s2 R int ii,ll; 1 U* |! g& S) j2 e/ ~7 T
unsigned char cc; 9 G2 }5 V$ t2 P' A9 r0 L2 J
ass="";
0 Q$ \; l r# ~) x) mll=ss.Length(); 4 R& l3 l/ R& {$ S' F$ s; p
for(ii=0;ii<ll;ii++)
) P1 ^; b# L4 o& B: R {
! d4 b" h' p% J2 r% G# w+ J cc=ss.c_str()[ii]; 6 {1 c0 p, [/ X: m
if(cc>0xa0)
% v* n+ V) P, c8 j, Z* o {
/ w- u" v, {/ I" a* z ass=ass+ss.SubString(ii+1,2); + z m6 ]/ a! ]! u& D& p; O
i++;
" R: S0 s* i$ L. X, U }
5 P9 P7 p- d# |4 f6 Q1 X( H( u else
/ {; y( L9 A w) Q& F {
9 f* l$ D& {8 S. p ass=ass+ss.SubString(ii+1,1); i% e. V A% |) O5 ?( K
* ^1 {+ c& l, T a) G' A8 x6 d } , w( v2 L. o6 x' Z0 D7 n
} ; ~( t+ }2 _) I6 l
return ass; ) ~0 o' W' {2 a: a
} |