|
在很多情况下都要识别汉字,以下是函数 VString ) j& z% b! m# ~, ]1 z/ ~3 ]6 d
AnsiString __fastcall TForm1::VString(AnsiString ss)
. `& i5 V& j8 ` { 0 h" J& R1 A5 Q; p( P' @
AnsiString ass;
5 h/ M0 B0 L7 \0 R int ii,ll;
8 P2 A& L+ v1 x6 N unsigned char cc; ! S& w4 J7 S: ~1 N4 P
ass="";
7 {! f5 M) l& [% N# D I6 g0 qll=ss.Length(); 2 A% @5 g" r! f) D7 Y5 M: M0 ?
for(ii=0;ii<ll;ii++)
6 q3 V/ U; {% s" b! l4 I# C {
$ `8 A; I4 t. S( v cc=ss.c_str()[ii];
$ q# H8 E, U' k/ @ if(cc>0xa0)
. e9 X- G5 z& d2 ] {
5 P5 S- X" x" ^! S ass=ass+ss.SubString(ii+1,2);
0 x6 Z: x2 W3 v+ u9 v i++;
/ C, `- R3 ^' h } , T' ]) Z: m( `" h+ a3 m
else
( ], K1 O4 ]8 u' z8 Q/ s/ W {
5 }: b$ T: f2 z( C" b. h7 } ass=ass+ss.SubString(ii+1,1); , P* ~+ t# ]0 x* l& g7 p
4 S( u g* r4 ]+ U
} 3 S R1 i! Z/ m0 \
}
, x# H1 N2 ]. a3 x return ass;
- \6 f P& D) X: o9 V5 f" S} |