如何清空edit 为什么在editkeydown中使用if key=106 then edit1.Text:='';不能清除‘*’其他非数字,字母好像也不行KEYPRESS也不行,请问如何清空edit 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 edit1.Text:='' 断点查该句是否被执行 如果没被执行,好像from内有个keyp...属性赋值 true if Key = 13 then Edt1.Text := ''; 106 的是指 j 的编码,便是键盘输入时,是算 J 的编码,即74,所以改成 if Key = 74 then Edt1.Text := ''; 执行了我随便输入‘jhkhk*’,星号前面的都清了,只剩下‘*’一个字符现在发现是判断哪个键,哪个键就不被清 楼主请学会解决问题的办法edit1.Text:=''你觉得这句话不能情况edit么?那么你用一个按钮,里面写这句话看能不能清如果你可用断点,看这句话有没有执行当然最好方法如果执行了还没清,这问题就比较奇怪,你看看edit1其他事件里面你有没有写其他代码 KEYPRESS 事件中key赋值0执行清过程后加入一下代码key:=0; keyup可以看来最后一个字符在keydown中未存入edit 因为你按下的键也将在你清edit1之后,回显在edit1中,所以要赋值0 keyup可以是因为,在放开按键后,键值回显到edit后执行的事件,所以可以全部清除 在onKeyPress事件里写: if Key='*' then begin Key:=#0; self.Edit1.Text:=''; end;这样就行了 数据库查询出来后要使数据相同的就只显示一个呢 如何在运行时创建一个InterBase数据库???? 多线程处理word问题(高手帮忙啊)! 急着要,在线等待。解决马上给分。 救急!小妹12号就要毕业论文答辩前的测试了,但是还有几个小小的问题,希望高手指教! 取得 word中书签 内的控件(比如check)的信息 我今天有病!!!!!!!!!!! 在IE的编辑框中保存的信息是存放在什么地方? 怎么改变菜单的字体大小? 我能不能用一张表来存放密码呢,有没有比这更好的方法呢 用ListView如何将数据库中的Boolean值显示成√ 请高手求解:动态生成树与DBGird结合,联动的问题!
Edt1.Text := '';
所以改成
if Key = 74 then
Edt1.Text := '';
我随便输入‘jhkhk*’,星号前面的都清了,只剩下‘*’一个字符
现在发现是判断哪个键,哪个键就不被清
请学会解决问题的办法edit1.Text:=''你觉得这句话不能情况edit么?
那么你用一个按钮,里面写这句话看能不能清
如果你可用断点,看这句话有没有执行当然最好方法
如果执行了还没清,这问题就比较奇怪,你看看edit1其他
事件里面你有没有写其他代码
key:=0;
看来最后一个字符在keydown中未存入edit
if Key='*' then
begin
Key:=#0;
self.Edit1.Text:='';
end;这样就行了