VFP 愛用者社區

kmkna1103 · 註冊時間: 2008-05-08 文章: 119 來自: 台灣 第 1 樓

我是用vfp6開發遇到一個狀況比如說我在新增編輯時第一個欄位類別是combobox然後第二個欄位是textbox第二個欄位我在keypress event去呼叫一個程序每次我只要第一個欄位編輯完到第二個欄位時只要去呼叫到
keypress event的程序時都會死當，但是把2個欄位相反過來編輯又不會有這種問題，想請問各位前輩有發生這種狀況過嗎?

syntech · 發表於: 星期一六月 09, 2008 5:45 pm 文章主題:

你的keypress event的內容才是關鍵.

kmkna1103 · 發表於: 星期一六月 09, 2008 6:06 pm 文章主題:

我下拉式選單選完時我在來執行的欄位KEYPRESS EVENT 有下一個
IF nKEYCODE=-1
DO FORM PKCURS
ENDIF
這個視窗被吃掉了
但是我去那個FORM把alwaysonbottom改成.T.的話他是跑得出來但是還是死當

kmkna1103 · 發表於: 星期一六月 09, 2008 6:09 pm 文章主題:

補充在TEXTBOX我VALID有下一段
IF THISFORM.RELEASETYPE <> -1 .AND. LASTKEY()<>27
IF EMPTY(THIS.VALUE)
RETU .F.
ELSE
IF SQL_SEEK_DATA(THIS.VALUE,"WORKS","WORK_NO"," *")
THISFORM.WORK_NA1.VALUE=DATA_SE.WORK_NA
RETU .T.
ELSE
MESSAGEBOX("無此編號或代碼喔!!",0+64+0,"請確定")
THIS.VALUE=''
THISFORM.WORK_NA1.VALUE=''
RETU .F.
ENDIF
CLOSE_DBF("DATA_SE")
ENDIF
ENDIF
如果我把他改成
IF SQL_SEEK_DATA(THIS.VALUE,"WORKS","WORK_NO"," *")
THISFORM.WORK_NA1.VALUE=DATA_SE.WORK_NA
ELSE
MESSAGEBOX("無此編號或代碼喔!!",0+64+0,"請確定")
THIS.VALUE=''
THISFORM.WORK_NA1.VALUE=''
ENDIF
CLOSE_DBF("DATA_SE")
是沒問題的但是沒辦法強制空白值輸入

nelsonchuang · 發表於: 星期一六月 09, 2008 7:16 pm 文章主題:

先說明死當的定義是什麼?
我記得在5年以前,有一個人問了類似的問題,在紅狐..你先去查一下
有關readonly以及enabled的關鍵字.

kmkna1103 · 發表於: 星期一六月 09, 2008 8:37 pm 文章主題:

我所謂的死當不是出現什麼錯誤而是不管在怎麼編輯都無法存檔和跳出

kmkna1103 · 發表於: 星期一六月 09, 2008 8:39 pm 文章主題:

謝謝你提供的網站我去找找看

syntech · 發表於: 星期二六月 10, 2008 12:42 am 文章主題:

我覺得很正常,而你覺得死當.

其中的差別在於你不知道把物件的控制權交到哪邊去了.

kmkna1103 · 發表於: 星期二六月 10, 2008 2:00 am 文章主題:

或許這就是經驗的差別=_=我會加油的

garfield · 發表於: 星期二六月 10, 2008 9:18 am 文章主題:

先提醒一個概念,
在do form xxxxx 時, 除非設成 form.windowstype=1
不然vfp是不會等form 結束關閉, 就會去執行下一行指令.

nelsonchuang · 發表於: 星期二六月 10, 2008 9:27 am 文章主題:

kmkna1103 · 發表於: 星期二六月 10, 2008 1:46 pm 文章主題:

問題已解決，後來找出問題在於retu這個命令會去搶控制權。