604
社区成员
发帖
与我相关
我的任务
分享TEdit组件的OnKeyPress事件问题
如我不想在组件中输入1时我添加如下代码
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
AnsiString t;
if(Key=='1')
{
t=Edit1->Text;
t.Delete(t.Length(),1);
Edit1->Text= t;
}
}
但运行结果绝对是错的,
我设断电看了,发现在事件处理完成后,组件还是在Text中添加了1,请高手指教
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
AnsiString t;
if(Key=='1')
{
t=Edit1->Text;
t.Delete(t.Length(),1);
Edit1->Text= t;
}
}
但运行结果绝对是错的,
我设断电看了,发现在事件处理完成后,组件还是在Text中添加了1,请高手指教
...全文
请发表友善的回复…
发表回复
geniushuai 2006-06-07
- 打赏
- 举报
谢谢
tianshu888 2006-06-07
- 打赏
- 举报
不用逆那么麻烦
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
if(Key=='1') Key = 0;//这一句就行 如果输入1就取消
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
if(Key=='1') Key = 0;//这一句就行 如果输入1就取消
daydayup234 2006-06-07
- 打赏
- 举报
if(Key=='1')
Key='\0';
Key='\0';
Janes001 2006-06-07
- 打赏
- 举报
我想这样会更好吧，如果Key是1，直接将Key设置为0，而不要再去删除它。
