procedure TForm1.Button2Click(Sender: TObject);
var
ss: string;
begin
ss := '测s试ss';
showmessage(copy(ss,1,1));//测
showmessage(copy(ss,1,2));//测s
showmessage(copy(ss,1,3));//测s试
showmessage(copy(ss,1,4));//测s试s
showmessage(copy(ss,1,5));//测s试ss
showmessage(copy(ss,1,6));//测s试ss showmessage(copy(ss,0,1));//测
showmessage(copy(ss,1,1));//测
showmessage(copy(ss,0,2));//测end;string改了类型后,好像使用起来不习惯哦。谁帮忙总结下。
var
ss: string;
begin
ss := '测s试ss';
showmessage(copy(ss,1,1));//测
showmessage(copy(ss,1,2));//测s
showmessage(copy(ss,1,3));//测s试
showmessage(copy(ss,1,4));//测s试s
showmessage(copy(ss,1,5));//测s试ss
showmessage(copy(ss,1,6));//测s试ss showmessage(copy(ss,0,1));//测
showmessage(copy(ss,1,1));//测
showmessage(copy(ss,0,2));//测end;string改了类型后,好像使用起来不习惯哦。谁帮忙总结下。
解决方案 »
- delphi 比较日期大小的问题
- delphi utf-8 支持乱码问题
- 轻量级的IM工具。很小,但是文件传输方面的功能比较强大,速度也很不错。大家去试试看:)
- 如何在DBGrid上选中某一行,点回车后自动把该记录的内容写到文本框中?
- 怎样实现点击窗体最小化按钮时任务栏区出现系统托盘,而其他情况下不出现
- 请叫delphi的数据库高手
- 请问:如和将一个email,包括附件一起保存下来?
- 简单问题,请问如何分别得到,年,月,日
- 一个关于COM+的问题,非常有意思。
- 用InstallShield5做安装程序,如何将数据源自动添加到ODBC中。
- 第一次接触DELPHI,关于连数据库的东东。
- delphi如何引用类啊?
所以这一段就好好理解了,E文字符和汉字是同等地位,都是一个unicode字符。
showmessage(copy(ss,1,1));//测
showmessage(copy(ss,1,2));//测s
showmessage(copy(ss,1,3));//测s试
showmessage(copy(ss,1,4));//测s试s
showmessage(copy(ss,1,5));//测s试ss
showmessage(copy(ss,1,6));//测s试ss
这下面几个嘛,原理一样:unicode是双字符的,如果只取其中一个字节,也是按双字节算
ss从第0个开始,连续1个字符,当然是第一个字“测”
showmessage(copy(ss,0,1));//测
ss从第1个开始,连续1个字符,当然也是第一个字“测”
showmessage(copy(ss,1,1));//测
ss从第0个开始,连续2个字符,当然还是第一个字“测”
showmessage(copy(ss,0,2));//测
string下标是从1开始的
你copy 0开始是干嘛?
VC6默认是单字节的,VS2005默认是双字节的