请教两个字符串的问题! 1.如何除去一个字符串中的所有空格?2.我在TreeView中重命名节点时,希望屏蔽掉除数字、字母、汉字外的其他字符,能做到吗? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 1. http://community.csdn.net/Expert/topic/5120/5120342.xml?temp=.84730172. 判断新的名字每一个字符是不是数字或字母或汉字其中一个,参考一下StrUtils.pas单元。解决就不麻烦了。 使用KeyPress事件判断输入的key in ['a'..'z','A'..'Z','0'..'9'] 即可如果不是的话则赋值 Key:=#0 在keypress中加代码吧if not(key in ['0'..'9','a'..'z','A'..'Z',chr(8)]) and (ord(Key)<=127) thenbegin beep; key:=chr(0);end;汉字的ascii编码都大于127 算法导论 有哪位大侠用过TAPI控件啊,能分享一下怎么使用TAPI啊??? 自定义组件怎么不显示caption 关于ClientSocket1连接的问题(局域网内能正常连接发送数据,interner却不行) 关于帐套的问题? About WebService …… 谁能帮我编写一个使用16进制数进行相加并得出最后一位作为校验和的程序 感谢李兄,敬请李兄来拿分! 有关字符串处理 query1.requestlive=true/false问题? Ehlib3的DEMOS里Dbgrideh 是如何实现合并单元格的? 请教!!用udp传输图片问题???
2. 判断新的名字每一个字符是不是数字或字母或汉字其中一个,参考一下StrUtils.pas单元。
解决就不麻烦了。
如果不是的话则赋值 Key:=#0
if not(key in ['0'..'9','a'..'z','A'..'Z',chr(8)]) and (ord(Key)<=127) then
begin
beep;
key:=chr(0);
end;
汉字的ascii编码都大于127