请问怎可以实现当在edit1中输入一定字数后光标会自动跳到edit2中啊?? 请问怎可以实现当在edit1中输入一定字数后光标会自动跳到edit2中啊?? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在OnChange事件中if length(edit1.text)=n then edit2.setfocus; OnKeyPressif Key Not In (#8,'0'..'9') then Key := #0else if Length(Edit1.Text) > 5 then PostMessage(form1.ActiveControl.Handle,WM_KEYDOWN, VK_TAB, 0); Delphi中BDE连接Access问题! 关于query控件的参数问题,很奇怪?? 请问如何将C语言中的长整型日期转换成字符串? 求一个能查找目录下面所有文件的算法!先到的有分! 一个动态产生DBEdit控件的绑定问题!! 如何将adoquery中的数据一一读出? 为什么汉字变成了ASCII码? 请教 版主,我的问题还没问完,请手下留情。关于dll的问题! 数据窗体与报表窗体的冲突问题? 我需要你们 《delphi开发人员指南》及李先生的书的完整下载网址,谢谢
if length(edit1.text)=n then
edit2.setfocus;
Key := #0
else
if Length(Edit1.Text) > 5 then
PostMessage(form1.ActiveControl.Handle,WM_KEYDOWN, VK_TAB, 0);