在網(wǎng)頁(yè)中引用DWG控件,交互繪圖,和響應(yīng)鼠標(biāo)點(diǎn)擊對(duì)象的方法

1、在網(wǎng)頁(yè)中引用DWG控件，交互繪圖，和響應(yīng)鼠標(biāo)點(diǎn)擊對(duì)象的方法MXDRAW CAD控件文檔下面幫助的完整例子，在控件安裝目錄的SampleIe iedemo.htm中.1. 主要用到函數(shù)說(shuō)明A. ImplementCommandEventFun控件的命令事件函數(shù)，與用戶(hù)交互的操作，需要放到命令事件函數(shù)內(nèi)實(shí)現(xiàn)，這樣控件才能保證正常的Windows 消息循環(huán)被處理。B. ImplementMouseEventFun控件的鼠標(biāo)事件函數(shù)，可以用JS程序里，響應(yīng)鼠標(biāo)事件，詳細(xì)說(shuō)明如下：void MouseEvent(LONG lType, DOUBLE dX, DOUBLE dY, LONG* lRet);

2、LONG lType 事件類(lèi)型,1鼠標(biāo)移動(dòng)，2是鼠標(biāo)左鍵按下，3是鼠標(biāo)右鍵按下，4是鼠標(biāo)左鍵雙擊 5是鼠標(biāo)左鍵釋放 6是鼠標(biāo)右鍵釋放 7是鼠標(biāo)中鍵按下 8是鼠標(biāo)中鍵釋放 9是鼠標(biāo)中鍵雙擊 10是鼠標(biāo)中鍵滾動(dòng) DOUBLE dX 事件發(fā)生時(shí)的鼠標(biāo)X坐標(biāo)，文檔坐標(biāo) DOUBLE dY 事件發(fā)生時(shí)的鼠標(biāo)Y坐標(biāo)，文檔坐標(biāo) LONG* lRet lRet 返回非0，消息將不在往下傳遞 C. DrawLine用于在DWG圖上繪制一條直線(xiàn)，詳細(xì)說(shuō)明如下：參數(shù) 說(shuō)明 DOUBLE dX1 直線(xiàn)的開(kāi)始點(diǎn)x坐標(biāo) DOUBLE dY1 直線(xiàn)的開(kāi)始點(diǎn)y坐標(biāo) DOUBLE dX2 直線(xiàn)的結(jié)束點(diǎn)x坐標(biāo) DOUBLE dY

3、2 直線(xiàn)的結(jié)束點(diǎn)y坐標(biāo) D. IMxDrawSelectionSet:SelectAtPoint2返回一點(diǎn)坐標(biāo)下面的實(shí)體對(duì)象，可以設(shè)置過(guò)濾條件，返回某層，某類(lèi)型等屬性的對(duì)象。2. JS中實(shí)現(xiàn)代碼說(shuō)明A. 在網(wǎng)頁(yè)中引用控件,clsid:6EEC44E0-338B-408A-983E-B43E6F22B929是控件的GUID.控件程序可以做成CAB安裝包，并可進(jìn)行數(shù)據(jù)簽名，方便網(wǎng)頁(yè)中自動(dòng)安裝下載.詳細(xì)參考例子： <object classid="clsid:6EEC44E0-338B-408A-983E-B43E6F22B929" id="MxDrawXCtrl

4、" codebase=" width=100% height=90%> <param name="_Version" value="65536"> <param name="_ExtentX" value="24262"> <param name="_ExtentY" value="16219"> <param name="_StockProps" value="0"&

5、gt;<!- <param name="DwgFilePath" value=" -><param name="IsRuningAtIE" value="1"><param name="EnablePrintCmd" value="1"><param name="ShowStatusBar" value="1"><param name="ShowMenuBar" va

6、lue="1"><param name="ShowToolBars" value="1"><param name="ShowCommandWindow" value="1"><param name="ShowModelBar" value="1"><param name="IniFilePath" value="AutoActive=N,LoadMrx=PropertyEdito

7、r.mrx"> <param name="ToolBarFiles" value="MxDraw-ToolBar.mxt,MxDraw-ToolBar-DrawParam.mxt,MxDraw-ToolBar-Draw.mxt,MxDraw-ToolBar-Edit.mxt"> </object><script>B. 設(shè)置命令事件回調(diào)函數(shù)document.getElementById("MxDrawXCtrl").ImplementCommandEventFun = DoComman

8、dEventFunc;C. 設(shè)置鼠標(biāo)事件回調(diào)函數(shù)document.getElementById("MxDrawXCtrl").ImplementMouseEventFun = MouseEvent;D. 在命令事件交互繪制一條直線(xiàn)該事件將會(huì)被，網(wǎng)頁(yè)中的myclick按鈕點(diǎn)擊觸發(fā)，如下：function myclick()document.getElementById("MxDrawXCtrl").DoCommand(1);下面是繪制直線(xiàn)代碼：function DoCommandEventFunc(iCmd) / 命令事件ID. if (iCmd = 1)

9、 / 得到網(wǎng)頁(yè)的中的控件對(duì)象.var mxOcx = document.all.item("MxDrawXCtrl"); mxOcx.focus();var point1 = mxOcx.GetPoint(null,"n 點(diǎn)取開(kāi)始點(diǎn):");if(point1 = null) return;var point2 = mxOcx.GetPoint(point1,"n 點(diǎn)取結(jié)束點(diǎn):");if(point1 = null) return; / 繪制一條直線(xiàn). mxOcx.DrawLine(point1.x,point1.y,point2.x,

10、point2.y);E. 在鼠標(biāo)事件中得到鼠標(biāo)點(diǎn)擊的對(duì)象.function MouseEvent(dX,dY,lType) / 4是鼠標(biāo)左鍵雙擊if(lType = 4) / 得到網(wǎng)頁(yè)的中的控件對(duì)象 var axMxDrawX1 = document.getElementById("MxDrawXCtrl"); / 創(chuàng)建一個(gè)選擇集對(duì)象var ss = axMxDrawX1.CallCustomFunction("Mx_NewSelectionSet",""); / 創(chuàng)建一個(gè)點(diǎn)對(duì)象var pt = axMxDrawX1.CallCustomFunction("Mx_NewPoint",""); / 創(chuàng)建一個(gè)過(guò)濾條件對(duì)象 var fil = axMxDrawX1.CallCustomFunction("Mx_NewResbuf",""); / 把鼠標(biāo)點(diǎn)擊坐標(biāo)，賦值給點(diǎn)對(duì)象.pt.x = dX; pt.y = dY; / 在該點(diǎn)處構(gòu)造選擇集. ss.SelectAtPoint2(pt,fil); / ss.Coune是選擇集中對(duì)象數(shù)目 if(ss.Count > 0) / 得到選擇集中