W wangzhibing3366 Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-20 #1 怎么样截取字符串（中文和字符都有的） 比喻说有一个str := '字符22串23函数' 我要截取其中的几个字符，不知道怎么做！！！
L lsq1 Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-20 #2 copyfunction Copy(S; Index, Count: Integer): string;
X xpricher Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-20 #4 举例：str := '字符22串23函数' [Delphi] function Copy(S: string; Index: Integer; Count: Integer): string; newstr := copy (str, 2, 3);
举例：str := '字符22串23函数' [Delphi] function Copy(S: string; Index: Integer; Count: Integer): string; newstr := copy (str, 2, 3);
W wangzhibing3366 Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-20 #5 举例：str := '字符22串23函数' [Delphi] function Copy(S: string; Index: Integer; Count: Integer): string; newstr := copy (str, 2, 3); ------------------------------------------- 当我用copy(str,1,3)的时候就是乱码，不是“字符2”
举例：str := '字符22串23函数' [Delphi] function Copy(S: string; Index: Integer; Count: Integer): string; newstr := copy (str, 2, 3); ------------------------------------------- 当我用copy(str,1,3)的时候就是乱码，不是“字符2”
4 41426277 Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-20 #6 举例：str := '字符22串23函数' [Delphi] function Copy(S: string; Index: Integer; Count: Integer): string; newstr := copy (str, 2, 3); ------------------------------------------- 当我用copy(str,1,3)的时候就是乱码，不是“字符2” ////////////////// 一个中文=2个字符 newstr := copy (str, 2, 4);//就对了
举例：str := '字符22串23函数' [Delphi] function Copy(S: string; Index: Integer; Count: Integer): string; newstr := copy (str, 2, 3); ------------------------------------------- 当我用copy(str,1,3)的时候就是乱码，不是“字符2” ////////////////// 一个中文=2个字符 newstr := copy (str, 2, 4);//就对了
O onlyonekgx Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-20 #7 copy (WideString(str), 2, 3)
暗 暗夜中独舞 Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-20 #8 你们给的方法都是在str 已经确定的情况下的 var i,count,c:integer; s:string; begin count:=Length(str); for i:=0 to count-1 do beign try c:=StrToInt(str); except s:=s+c; end; end; end;
你们给的方法都是在str 已经确定的情况下的 var i,count,c:integer; s:string; begin count:=Length(str); for i:=0 to count-1 do beign try c:=StrToInt(str); except s:=s+c; end; end; end;
J jsxjd Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-20 #9 var s:string; begin s:='字符22串23函数'; s:=Copy(WideString(s),4,3); showmessage(s);
L liaj Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-20 #10 var str, NewStr: WideString; begin str := '字符22串23函数'; //再正常的调Copy函数，保你没任何问题 NewStr:= Copy(str, 1, 3); //此时NewStr='字符2'
var str, NewStr: WideString; begin str := '字符22串23函数'; //再正常的调Copy函数，保你没任何问题 NewStr:= Copy(str, 1, 3); //此时NewStr='字符2'
D Delphizhou Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-20 #11 漢字是兩位，如果你要是想得到“字符22”那麽就是COPY(STR,1,6)才可以。就不會出現亂碼了。
L levi Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-20 #12 liaj讲的对，用WideString就不会错了，汉字也会当成一个字符来处理
一 一份子 Unregistered / Unconfirmed GUEST, unregistred user! 2007-04-20 #13 用DELPHI的帮助文件查一下,String的字符截取多的是,
