請問各位高手.. 以下有幾個問題,可否幫個忙 1.        為何在執行程式時,例如登入資料庫畫面,確認時,會create一些form,都沒問題,但按放棄直接退出時,下form.free的指令時,就會先出現 Access violation at address 004F1D1F in module的錯誤 按掉後再出現 Runtime error 216 at 00002FE0的錯誤! 2.        請問在何種情形下,會出現直接執行執檔時,不會有error產生,但debug時就會出現. 3.        另有一個小困惑..不應放在這主題裏…就是啊.. 為什麼我的ctrl+shift+(I) 不能用?    謝謝各位了!!

引言: 請問各位高手.. 以下有幾個問題,可否幫個忙 1. 為何在執行程式時,例如登入資料庫畫面,確認時,會create一些form,都沒問題,但按放棄直接退出時,下form.free的指令時,就會先出現 Access violation at address 004F1D1F in module的錯誤 按掉後再出現 Runtime error 216 at 00002FE0的錯誤! 2. 請問在何種情形下,會出現直接執行執檔時,不會有error產生,但debug時就會出現. 3. 另有一個小困惑..不應放在這主題裏…就是啊.. 為什麼我的ctrl shift (I) 不能用? 謝謝各位了!! < face="Verdana, Arial, Helvetica"> 1.可否post, 登入時create的指令及close時你下的指令內容 2.你使用try...except 時就會有這樣情況 例如 try 1/0; except end; 3.順便解答一下, 站長不要介意 你沒有mark 任何內容, 當然不會動! ps:你這篇不應該放在資料庫, 放在其他難以歸類比較好! 發表人 - P.D. 於 2003/04/01 14:32:14

引言: 請問各位高手.. 以下有幾個問題,可否幫個忙 1. 為何在執行程式時,例如登入資料庫畫面,確認時,會create一些form,都沒問題,但按放棄直接退出時,下form.free的指令時,就會先出現 Access violation at address 004F1D1F in module的錯誤 按掉後再出現 Runtime error 216 at 00002FE0的錯誤! I think you try to free it 2nd times. Check whether the dialog has a OnClose event and if there is any Action := caFree; there. Remove either the action line or your free line. 2. 請問在何種情形下,會出現直接執行執檔時,不會有error產生,但debug時就會出現. Too many possibilities... 3. 另有一個小困惑..不應放在這主題裏…就是啊.. 為什麼我的ctrl shift (I) 不能用? Key conflicts? Try Ctrl K and then Ctrl I 謝謝各位了!! < face="Verdana, Arial, Helvetica">

謝謝P.D解答 首先 1.我先POST一些程式碼,但因為CREATE太多FORM,是一層CALL一層的,所以.. 這是主程式裏的 Application.Initialize; Application.CreateForm(TForm_Main, Form_Main); if Form_Main.Enter then begin Application.Title := 'TEST'; Application.Run; end; Form_Main.Free; 2.另外..^^ CTRL SHIFT之前,我當然有MARK囉!!

引言: 謝謝P.D解答 首先 1.我先POST一些程式碼,但因為CREATE太多FORM,是一層CALL一層的,所以.. 這是主程式裏的 這段應該是在 dpr中的程式碼吧! 而不是Main_Form 中的code Application.Initialize; Application.CreateForm(TForm_Main, Form_Main); if Form_Main.Enter then begin Application.Title := 'TEST'; Application.Run; end; 這一段改成下面的就好了 Application.Title := 'TEST'; Application.Run; 因為假設Form_Main是mainform, 這段並沒有意義, Application.Title與 Form_Main無直接關係 Form_Main.Free; 這一段拿掉, 改到 Form_Main的 OnClose 中寫到 Action:= caFree; Form_Main:= nil; 再透過一個Button1Click(...)寫到 Form_Main.Close; 就不會有你所謂的Access 錯誤出來了! 你這樣的寫法十分奇怪, 不知從何得來的information 2.另外..^^ CTRL SHIFT之前,我當然有MARK囉!! 這個我可不知道啦!