不能開Excel |
缺席
|
kuf41
中階會員 ![]() ![]() ![]() 發表:14 回覆:45 積分:51 註冊:2006-12-03 發送簡訊給我 |
請教:
我程式尚未關閉,只要有執行到以下程式碼,就不能再另外開啟Excel檔案, 可以用程式開啟,而是不能在.XLS檔點2下開啟,一定要把程式停掉才能再開, 要如何解決呢? procedure xlsFile; var theExcel :Variant; begin //1.開啟Excel檔案 try theExcel := CreateOleObject('Excel.Application'); theExcel.WorkBooks.Open(currFile); theExcel.Visible := false; except errLog.Add('Open Excel OLE Object Failed !'); Exit; end; //2處理 ......................................... ......................................... //釋放 theExcel.Quit; theExcel := Unassigned ;
------
一切都為了明天 |
P.D.
版主 ![]() ![]() ![]() ![]() ![]() ![]() 發表:603 回覆:4038 積分:3874 註冊:2006-10-31 發送簡訊給我 |
|
kuf41
中階會員 ![]() ![]() ![]() 發表:14 回覆:45 積分:51 註冊:2006-12-03 發送簡訊給我 |
|
pceyes
尊榮會員 ![]() ![]() ![]() ![]() ![]() ![]() 發表:70 回覆:657 積分:1140 註冊:2003-03-13 發送簡訊給我 |
多用搜尋功能,多測試一下,就可以用了,幫你找了一個
讀取Excel檔後,要如何釋放.... http://delphi.ktop.com.tw/board.php?cid=30&fid=66&tid=90413
------
努力會更接近成功 |
kuf41
中階會員 ![]() ![]() ![]() 發表:14 回覆:45 積分:51 註冊:2006-12-03 發送簡訊給我 |
|
kuf41
中階會員 ![]() ![]() ![]() 發表:14 回覆:45 積分:51 註冊:2006-12-03 發送簡訊給我 |
|
pceyes
尊榮會員 ![]() ![]() ![]() ![]() ![]() ![]() 發表:70 回覆:657 積分:1140 註冊:2003-03-13 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |