VFP 愛用者社區 首頁 VFP 愛用者社區
本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
 
 常見問題常見問題   搜尋搜尋   會員列表會員列表   會員群組會員群組   會員註冊會員註冊 
 個人資料個人資料   登入檢查您的私人訊息登入檢查您的私人訊息   登入登入

編譯後程式不能完全釋放出來

 
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區
上一篇主題 :: 下一篇主題  
發表人 內容
Batman



註冊時間: 2003-11-15
文章: 348


第 1 樓

發表發表於: 星期三 二月 03, 2010 8:41 pm    文章主題: 編譯後程式不能完全釋放出來 引言回覆

測試程式如下:
CurUserIP=LocalIP()
Wait wind CurUserIP
clear all
Return


Proc LocalIP
Local oWinsock
oWinsock=CreateObject("MSWinsock.Winsock")
If Type("oWinsock")#"O"
=Messagebox("Initialize Winsock Error")
Return ''
Else
cNetAddress=oWinsock.LocalIP
Release oWinsock
return cNetAddress
endif

以上執行程式沒問題, 可是編譯後, 那執行檔退出來後, 在工作管理員的程序處理仍然存在, 請問加了mswinsock後, 程式應要如何完全退出來?
回頂端
檢視會員個人資料 發送私人訊息
syntech



註冊時間: 2003-05-16
文章: 4211
來自: Taipei,Taiwan

第 2 樓

發表發表於: 星期四 二月 04, 2010 8:47 am    文章主題: 引言回覆

用上面程式測試,

可以完全退出 !? (0_o) |||

_________________
如果公司有下列困擾:
1. 找不到便宜,快速,簡易的 生產排程軟體
2. 不知道如何快速排定 採購計劃
3. 成本抓不準,自己算比軟體算有用
4. 想學習系統規劃,想找系統架構的顧問

請聯絡我們,也許我們幫得上忙
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件 AIM Address
Batman



註冊時間: 2003-11-15
文章: 348


第 3 樓

發表發表於: 星期五 二月 05, 2010 7:13 pm    文章主題: 引言回覆

你的測試程序可以釋放出來?我測試是程式沒有完全退出來, 在工作管理員的程序處理仍然存在
回頂端
檢視會員個人資料 發送私人訊息
LiuRambo



註冊時間: 2007-11-27
文章: 481


第 4 樓

發表發表於: 星期六 二月 06, 2010 9:16 am    文章主題: 引言回覆

點一下就結束程序啦
會退不出來?
回頂端
檢視會員個人資料 發送私人訊息 MSN Messenger
Batman



註冊時間: 2003-11-15
文章: 348


第 5 樓

發表發表於: 星期二 二月 09, 2010 9:49 pm    文章主題: 引言回覆

不是程式退不出來, 是編譯後,執行程式,出了 IP後, 點一下程式退出來, 但不是真的退了出來, 在查看工作管理員的程序處理仍然存在. 應是在那裡出問題??
回頂端
檢視會員個人資料 發送私人訊息
Batman



註冊時間: 2003-11-15
文章: 348


第 6 樓

發表發表於: 星期二 二月 09, 2010 9:50 pm    文章主題: 引言回覆

會不會是 用了 oWinsock=CreateObject("MSWinsock.Winsock") 後, 要將它釋放出來 ?如是,應怎樣釋放?
回頂端
檢視會員個人資料 發送私人訊息
syntech



註冊時間: 2003-05-16
文章: 4211
來自: Taipei,Taiwan

第 7 樓

發表發表於: 星期二 二月 09, 2010 10:23 pm    文章主題: 引言回覆

證明你是抄來的.

否則你不會不知道 "Release oWinsock " 的用途

_________________
如果公司有下列困擾:
1. 找不到便宜,快速,簡易的 生產排程軟體
2. 不知道如何快速排定 採購計劃
3. 成本抓不準,自己算比軟體算有用
4. 想學習系統規劃,想找系統架構的顧問

請聯絡我們,也許我們幫得上忙
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件 AIM Address
Batman



註冊時間: 2003-11-15
文章: 348


第 8 樓

發表發表於: 星期三 二月 10, 2010 10:05 am    文章主題: 引言回覆

是的, 是抄來的測試的, 既程式己 Release了,為何編釋後的exe在退出來後, 進程仍然留在工作管理員的程序處理,沒有被釋效出來, 希望各狐友幫忙一下, 試編釋再執行, 會不會出現我的情況, 謝謝
回頂端
檢視會員個人資料 發送私人訊息
Batman



註冊時間: 2003-11-15
文章: 348


第 9 樓

發表發表於: 星期三 二月 10, 2010 10:40 am    文章主題: 引言回覆

剛剛再測試,在程式中刪除全部, 祗留一行 wait wind 'aaa', 然後再編釋至testprog再執行, 發現程式還是留在工作管理員的程序處理, 那便不是owinsock的事, 為何不編釋後的exe進程不能釋放出來了, 各孤友可否幫忙
回頂端
檢視會員個人資料 發送私人訊息
Batman



註冊時間: 2003-11-15
文章: 348


第 10 樓

發表發表於: 星期三 二月 10, 2010 10:57 am    文章主題: 引言回覆

可以了, 完來是我在編釋程式的目錄上建了config.fpw, 內裡有Scree=off, 所以Screen沒被釋放出來, 程序便沒完全釋放, 純屬誤會, 不好意思, 打擾了
回頂端
檢視會員個人資料 發送私人訊息
syntech



註冊時間: 2003-05-16
文章: 4211
來自: Taipei,Taiwan

第 11 樓

發表發表於: 星期三 二月 10, 2010 11:56 am    文章主題: 引言回覆

不過也可擦屁股擦乾淨一點.
一樣是在本站還是紅狐偷來的. Twisted Evil

代碼:

CLOSE TABLES ALL
CLOSE DATABASES ALL
CLEAR MENUS
CLEAR EVENTS
ON SHUTDOWN
ON ESCAPE

* 副?#123;式 : S_SysEXIT
* 結束系統工作確定副?#123;式
Local C
For C = 1 to _Screen.FormCount
   If type("_Screen.ActiveForm") = "O"
      _Screen.ActiveForm.Release()
   Endif
Endfor
Clear events
Release all
Quit


這樣正常是 100% 離開,也釋放所有東西.



搜尋一下"不能離開vfp" ,

_________________
如果公司有下列困擾:
1. 找不到便宜,快速,簡易的 生產排程軟體
2. 不知道如何快速排定 採購計劃
3. 成本抓不準,自己算比軟體算有用
4. 想學習系統規劃,想找系統架構的顧問

請聯絡我們,也許我們幫得上忙
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件 AIM Address
richshih



註冊時間: 2007-10-11
文章: 153


第 12 樓

發表發表於: 星期三 二月 10, 2010 3:11 pm    文章主題: 引言回覆

加 RELEASE ALL +CANCEL 或 QUIT
CLEAR ALL 不會釋放系統變數,也不會清除已編譯程式的緩衝區。使用 CLEAR PROGRAM 來清除已編譯程式的緩衝區l
回頂端
檢視會員個人資料 發送私人訊息
從之前的文章開始顯示:   
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區 所有的時間均為 台北時間 (GMT + 8 小時)
1頁(共1頁)

 
前往:  
無法 在這個版面發表文章
無法 在這個版面回覆文章
無法 在這個版面編輯文章
無法 在這個版面刪除文章
無法 在這個版面進行投票
無法 在這個版面附加檔案
無法 在這個版面下載檔案


Powered by phpBB © 2001, 2005 phpBB Group
正體中文語系由 phpbb-tw 維護製作