G gdcqs Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-11 #1 我点击Button的为什么TEdit的焦点不释放,有什么办法把在点Button的Click, 强制先执行Tedit的OnExit内代码?
雪 雪中漫步 Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-11 #2 在button的click事件中 先写上edit1exit(nil);
G gdcqs Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-11 #3 需要说明的是我在OnExit内修改了这个Tedit内的Text信息
G gdcqs Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-11 #4 虽然事件内的代码执行了,但是他焦点仍然没有走. 我要的是焦点也要走!
F fmz Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-11 #5 你是不是在EDIT1中写有比如 IF EDIT1。TEXT =‘’ THEN edit1.SetFocus 此类意思的语句(就是说如果EDIT1在没有满足一定条件的时候始终要执行edit1.SetFocus ),如果是这样的话,可在BUTTON1的Button1MouseMove事件中给一个满EDIT1的条件就可以执行 Button1Click事件了
你是不是在EDIT1中写有比如 IF EDIT1。TEXT =‘’ THEN edit1.SetFocus 此类意思的语句(就是说如果EDIT1在没有满足一定条件的时候始终要执行edit1.SetFocus ),如果是这样的话,可在BUTTON1的Button1MouseMove事件中给一个满EDIT1的条件就可以执行 Button1Click事件了