转换成widestring,然后从倒数第2个开始copy
解决方案 »
- 如何查看delphi内部代码
- 帮忙写个触发器。谢谢
- 1象素=?毫米?
- 求wise 5.21注册码!
- SetwindowsHookEx() 函数的疑惑???
- 怎么将数据库中的字段项动态的添加到COMBOX里面去。(我用的是DB2数据库)
- 如何根据指针获得字符串内容
- 为什么在ToolBar上放10个ToolButton, 只显示前五个, 而且在显示时有一定的延迟?
- Canvans 的拉伸显示到Printer 是不是问题多多(今天我没有打印出来),推荐一个好的“打印图片”的控件好呢?
- 小鱼儿哥哥:快来啊!呵呵!
- 请问哪里可以下到关于installsheild 方面的文章?
- 谁有Microangelo 98 V5.5的注册码?十分感谢!!
kc:=copy(str,0,1);
if kc=':' then xz:=copy(str,i,length(str)-i);i:=i+1;
end;
Xz:=copy(str,ll_position+1,length(str)-ll_position);