CreateOleObject不存檔離開的語法 |
|
答題得分者是：axsoft
|
|
spriter
一般會員   發表：1 回覆：2 積分：0 註冊：2002-06-03 發送簡訊給我 |
|
|
axsoft
版主   發表：681 回覆：1056 積分：969 註冊：2002-03-13 發送簡訊給我 |
|
|
spriter
一般會員 發表：1 回覆：2 積分：0 註冊：2002-06-03 發送簡訊給我 |
|
|
axsoft
版主 發表：681 回覆：1056 積分：969 註冊：2002-03-13 發送簡訊給我 |
引言: oa := CreateOleObject('word.Application'); oa.Application.Visible:=True; oa.Quit; oa :=UnAssigned; _________________ 但在那個資料夾裡會產生「~$1.doc」 然後下次再執行oa時，他會出現「檔案使用中」.... 等的，然後「1.doc已為編輯而鎖定....」的訊息說 能不能不要有「~$1.doc」存在呀Sorry漏打了一些東西,再試試！
var
vMSWord : variant ;
aFileName : AnsiString ;
vSaveChanges : variant ;
vReadOnly, vLink : variant ; begin
vLink := unassigned ;
vReadOnly := true ;
vSaveChanges := false ;
aFileName := 'c:\Home\Sources\Cpp\Word\Document1.doc'; vMSWord := CreateOleObject('Word.Application');
vMSWord.Visible := true ;
vMSWord = GetActiveOleObject('Word.Application');
vWDocuments := vMSWord.Documents;
vWDocument := vWDocuments.Open(aFileName, vLink, vReadOnly);
vWDocument.Close(vSaveChanges);
vMSWord.Quit;
vMSWord:=UnAssigned;
end;
網路志工聯盟----Visita網站http://www.vista.org.tw
---[ 發問前請先找找舊文章 ]--- 發表人 - axsoft 於 2003/04/15 11:31:01
|
|
spriter
一般會員 發表：1 回覆：2 積分：0 註冊：2002-06-03 發送簡訊給我 |
|
|
axsoft
版主 發表：681 回覆：1056 積分：969 註冊：2002-03-13 發送簡訊給我 |
引言: 可以了~~~謝謝axsoft記得來結案喔! 網路志工聯盟----Visita網站http://www.vista.org.tw ---[ 發問前請先找找舊文章 ]--- |
發表時間：2003-04-15 10:31:04
IP:61.30.xxx.xxx 未訂閱
系統時間：2024-05-05 23:43:58
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |