全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1029
推到 Plurk!
推到 Facebook!

程式關閉的問題

尚未結案
kugids
一般會員


發表:14
回覆:10
積分:4
註冊:2005-04-09

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-06-19 01:56:54 IP:218.162.xxx.xxx 未訂閱
我是以第一個form叫出多個form的方式寫了一支程式    結構如下:      我使用FormX.ShowModal開啟下面的Form FormX.Close關閉Form 程式執行時一切正常 為何關閉Form的時候會出現CPU的問題? 還有,我加了FormX.Free也不行~~ 請各位高手指導~~謝謝
xu_caishen
一般會員


發表:6
回覆:20
積分:5
註冊:2005-04-15

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-06-19 08:33:23 IP:221.4.xxx.xxx 未訂閱
引言: 我是以第一個form叫出多個form的方式寫了一支程式 結構如下: 我使用FormX.ShowModal開啟下面的Form FormX.Close關閉Form 程式執行時一切正常 為何關閉Form的時候會出現CPU的問題? 還有,我加了FormX.Free也不行~~ 請各位高手指導~~謝謝
這得看你的程式怎麼寫,FormX.Free你寫在哪個事件裏面呢? 如果是寫在Close事件中,最好用Action :=caFree;
paste
一般會員


發表:13
回覆:19
積分:6
註冊:2005-04-27

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-06-19 11:50:15 IP:59.120.xxx.xxx 未訂閱
您好: 在每個form的close事件,加入Action :=caFree : procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin Action :=caFree; end; 就可直關閉軟體.並釋放記憶體. 如再有錯誤,可能是您其他程式碼錯誤導致. 請您將程式碼貼上,大家幫您看看.
kugids
一般會員


發表:14
回覆:10
積分:4
註冊:2005-04-09

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-06-21 21:55:06 IP:218.170.xxx.xxx 未訂閱
還是不行耶~~ 是不是因為我有引入dll的關係啊?
系統時間:2024-07-05 6:45:19
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!