如何利用ActiveX控制IE的選項

缺席

ccjason

一般會員

發表：3

回覆：22

積分：20

註冊：2002-04-05

發送簡訊給我

發表時間：2003-06-10 09:11:10

IP:210.202.xxx.xxx 未訂閱

請問,我想在網頁上直接控制IE的選項,例如預覽列印,

我找了一下資料,都是由應用程式來控制

我希望User在網頁上按下一個Button就能呼叫IE工具列上的某個選項

這應該要用ActiveX吧?不知有誰可以提供一點意見

謝謝

hagar

版主

發表：143

回覆：4056

積分：4430

註冊：2002-04-14

發送簡訊給我

發表時間：2003-07-09 19:01:25

IP:202.39.xxx.xxx 未訂閱

預覽列印用 TWebBrowser 的話:

WebBrowser1.ExecWB(OLECMDID_PRINTPREVIEW, OLECMDEXECOPT_PROMPTUSER);

另外這個也不錯:

http://www.euromind.com/iedelphi/embeddedwb.htm

---

--<-<-<@

發表人 - hagar 於 2003/07/09 19:14:11

pgdennis

資深會員

發表：41

回覆：525

積分：438

註冊：2002-05-23

發送簡訊給我

發表時間：2003-07-10 11:48:49

IP:218.163.xxx.xxx 未訂閱

1.如何寫IE plugin http://delphi.ktop.com.tw/topic.php?topic_id=32893

2.下載ie5toolshttp://www.euromind.com/iedelphi/ie5tools.htm,教你怎麼新增一按鈕在ie toolbar,按按鈕來呼叫plugin COM object

3.import MS internet control type lib,主要是要使用TInternetExplorer,TShellWindows,請先將原本內件的web_browser元件拿掉,再import,不然會衝到,將類似的程式碼加入你的plugin COM object..

{取得IE}

for i:=0 to ShellWindows1.Count-1 do begin

InternetExplorer1.ConnectTo(shellwindows1.item(i) as IWebBrowser2 );

if Pos('IEXPLORE.EXE',InternetExplorer1.FullName)>0 then

InternetExplorer1.ExecWB(OLECMDID_PRINTPREVIEW, OLECMDEXECOPT_PROMPTUSER);

不過如果你開2個以上的IE的話,請自行加其他條件判斷,不多贅

永遠追不上技術更新的速度~~

------

星期一,二...無窮迴圈＠＠

ccjason

一般會員

發表：3

回覆：22

積分：20

註冊：2002-04-05

發送簡訊給我

發表時間：2003-07-11 10:43:52

IP:210.202.xxx.xxx 未訂閱

謝謝回應,我已找到解答

本來以為要寫ActiveX才能控制IE的Menu選項

但後來在大陸的網站找到方法,原來早有物件存在,只要叫用就好了

height=0 id=WB width=0>

function doPrintSetup(){

//打印設置

WB.ExecWB(8,1)

}

function doSetTitle(){

//設定Title

WB.ExecWB(28,1,"Test")

}

function doPrintPreview(){

//打印預覽

WB.ExecWB(7,1)

}

括弧裡面數字代表的意義,查閱Delphi的Help就可以