我有一個對showmodal的判斷語句如下:
frm_ChekPassword.ShowModal ;
if frm_ChekPassword.ModalResult=mrOK then
.........
.........
我在frm_ChekPassword中的一個按鈕的單擊事件中有如下代碼:
modalresult := mrok;
close;為什麼我在跟蹤中發現frm_ChekPassword.ModalResult是2,mrok是1,不相等。
frm_ChekPassword.ShowModal ;
if frm_ChekPassword.ModalResult=mrOK then
.........
.........
我在frm_ChekPassword中的一個按鈕的單擊事件中有如下代碼:
modalresult := mrok;
close;為什麼我在跟蹤中發現frm_ChekPassword.ModalResult是2,mrok是1,不相等。
modalresult := mrCancel;
模式窗口按关闭按钮,就是modalresult := mrCancel;modalresul 只要遇到非0的值就肯定会关闭你只需要写
modalresult = mrok
就行了,它会关闭