我点击Button的为什么TEdit的焦点不释放,有什么办法把在点Button的Click,强制先执行Tedit的OnExit内代码?(15分)

G

gdcqs

Unregistered / Unconfirmed
GUEST, unregistred user!
我点击Button的为什么TEdit的焦点不释放,有什么办法把在点Button的Click,
强制先执行Tedit的OnExit内代码?
 
在button的click事件中
先写上edit1exit(nil);
 
需要说明的是我在OnExit内修改了这个Tedit内的Text信息
 
虽然事件内的代码执行了,但是他焦点仍然没有走.

我要的是焦点也要走!
 
你是不是在EDIT1中写有比如
IF EDIT1。TEXT =‘’ THEN
edit1.SetFocus
此类意思的语句(就是说如果EDIT1在没有满足一定条件的时候始终要执行edit1.SetFocus
),如果是这样的话,可在BUTTON1的Button1MouseMove事件中给一个满EDIT1的条件就可以执行
Button1Click事件了
 
接受答案了.
 
顶部