VFP中没有完全的事件。更没有MFC繁杂的KeyDown、KeyUp、MouseDown、MouseUp消息处理。这也是VFP精简的典范。
在Keypress中正是处理按键输入的,在这儿处理的只是键值输入的事,并没有对SelLength进行处理。你可以事件跟踪一下看SelLength的变化就知道了,同样你也可以试试将鼠标事件写在MouseDown中,也会慢半拍的,选中时没有,没选中时就有了。
如果非要实现同步的话,请将KeyPress和MouseUp中事件代码清空。
在表单的Paint事件中加入:
ThisForm.Text1.Value=ThisForm.Edit1.SelLength
This.refresh