WordApplication控制word(office2003) |
缺席
|
mufou
一般會員 發表:10 回覆:15 積分:10 註冊:2003-07-16 發送簡訊給我 |
請問可以用wordapplication控制版本為office2003的word嗎
我參閱這篇http://delphi.ktop.com.tw/topic.php?topic_id=20520
但是在WordApplication->Visible = True;這邊時
會顯示下列的錯誤訊息
[C Error] Unit1.cpp(79): E2247 'TWordApplication::Visible' is not accessible 因為我是想要將已存在的word檔更改左右的邊界,字型大小等
所以請問有什麼好方法嗎
thx.. 順便問一下,如果想看ole內附了什麼還是可用的話那邊有一覽的阿
例如像olefunction加參數有哪些可用之類的 發表人 - mufou 於 2005/04/11 12:47:27
|
mufou
一般會員 發表:10 回覆:15 積分:10 註冊:2003-07-16 發送簡訊給我 |
呵呵..已經可以開啟一存在的word檔
並更改左右邊界,字型大小了 程式碼如下
Variant WordApp, WordDocs, WordDoc, WordSelection, WordChange; //init WordApp=Variant::CreateObject("Word.Application"); WordApp.OlePropertySet("Visible", true); WordDocs=WordApp.OlePropertyGet("Documents"); //open file WordDoc=WordDocs.OleFunction("Open", "C:\\xxx.doc"); //select all WordDoc=WordApp.OlePropertyGet("ActiveDocument"); WordDoc.OleProcedure("Select"); WordSelection=WordApp.OlePropertyGet("Selection"); //set font size WordChange=WordSelection.OlePropertyGet("Font"); WordChange.OlePropertySet("Size",8); //set margin WordChange=WordSelection.OlePropertyGet("PageSetup"); WordChange.OlePropertySet("LeftMargin",250); WordChange.OlePropertySet("RightMargin",250);不過我還是想知道wordapplication是否可以控制2003版本的word檔 謝謝..^^ |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |