更進一步了解IE PlugIn(含範例) |
|
akai
一般會員 發表:27 回覆:22 積分:9 註冊:2003-03-30 發送簡訊給我 |
不知對於前文淺談製作IE PlugInhttp://delphi.ktop.com.tw/topic.php?TOPIC_ID=31020一文
是否有了初步的了解?這次將更進一步地實作IE PlugIn。 這一次的範例示範功能為在所選擇的圖片上按下右鍵後可選擇「Show URL」顯示圖片的網址路徑。 範例畫面1
範例畫面2
開發環境Delphi6 & Win2000 首先 Delphi→File→New→Other→ActiveX→ActiveX Library
接著加入 Delphi→File→New→Other→ActiveX→Automation Object
輸入CoClass Name (範例為 MSGCtrl)
這時我們在IMSGCtrl加入New Method,更將其更名 (範例為 ShowMSG)
在其Parameters中Add新的參數名稱、型態 (範例為 Str BSTR)
緊接著我們先存檔 (範例為 MSGCtrl.dpr & Unit1.pas) 修改在Unit1
Uses Dialogs procedure TMSGCtrl.ShowMSG(const Str: WideString);
begin
ShowMessage(Str);
end; 存檔 & Build All Projects 這時我們會發現程式目錄中增加了MSGCtrl.dll
於是Delphi→Run→Register ActiveX Server
如果要移除了話便選擇Delphi→Run→UnRegister ActiveX Server 上次我們有說過 IE必須透過VBScript來呼叫OCX與DLL,所以我們編寫一個HTML檔 (範例為 COMtest.htm)
內容如下(已附加在範例檔案中)
接著我們點擊Windows的開始→執行→Regedit
編輯以下內容
HKEY_CURRENT_USER->Software->Microsoft->Internet Explorer->MenuExt->Show URL(按下右鍵後會出現的名稱) Show URL(按下右鍵後會出現的名稱)這目錄的內容如下
(預設值) REG_SZ HTML存放的路徑\COMtest.htm
Contexts REG_DWORD 0x00000002(2) Contexts決定了右鍵選項何時出現的重要關鍵
這時開啟IE視窗(設定好之後必須開新的IE視窗才會有作用),開始測試吧!
附加檔案:31189_COMtest.zip
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |