|
在很多情况下都要识别汉字,以下是函数 VString - {/ O& Y* p3 K, C# A+ I
AnsiString __fastcall TForm1::VString(AnsiString ss)
6 N3 ^. z! M8 D7 L {
# |5 l4 w+ O# `+ m AnsiString ass;
7 d2 \* Y# y/ h* O Q int ii,ll;
6 n- M e- @8 G7 S7 t) [ unsigned char cc; ! h4 k9 f' b9 D; L( P
ass="";
8 A& u) M: f. j2 l1 R% A7 q6 f. ull=ss.Length(); + E4 ?* B0 Z2 @. m4 C- e
for(ii=0;ii<ll;ii++) + y: Y: o7 x: Q
{ 7 y1 \/ E, ]8 j) A' }7 g' Z+ W
cc=ss.c_str()[ii];
- l9 {6 G( A$ ?; f if(cc>0xa0)
) L3 i6 g: u# N- [+ x3 G' ? { ( Q2 A% f1 l# V
ass=ass+ss.SubString(ii+1,2); 4 e$ @8 a8 d$ Q6 }0 |
i++; / }" z( X, ?- O' W( F
}
! [- A7 j1 `# `4 O" { else
& d! E' |* l% ]- O. o { 6 g3 @5 w y! \0 x6 G8 A( n$ _
ass=ass+ss.SubString(ii+1,1); 6 }: y$ P. b$ y4 s9 G) h8 B
3 m0 X6 V( r- Y) } }
% b) l7 V! K, X8 G+ T } 8 J. t; P# V, s4 J/ R
return ass;
( a) t! u+ O5 { O+ y, M/ ?} |