如何设置当前显示的光标？

• 回答：

  主要用到函数说明：

  
  

  MxDrawXCustomFunction::Mx_SetCursor

  
  

  设置当前显示的光标，光标可以从cur文件加载，详细说明如下：

  
  

  参数	说明
  CString sCursorFileName	CUR光标文件，可以是个绝对路径，也可以是相对路径，相对于MxDrawX.ocx所在目录

  
  

  例如:VB调用例子.选项择一个实体，修改光标样式 ：

  
  

     Set mxUtility = New MxDrawXLib.MxDrawUtility   
     // 保存光标，用于恢复   MxDrawX1.Call "Mx_SaveCursor", ""   
     // 设置光标
     MxDrawX1.Call "Mx_SetCursor", "harrow.cur"   
     // 选择实体
     Dim ent As MxDrawXLib.MxDrawEntity
     Set ent = mxUtility.GetEntity(getPt, Chr(13) + Chr(10) + "实体1")
  
     If (ent Is Nothing) Then
          MsgBox "没有选择实体.."        
          // 恢复光标
          MxDrawX1.Call "Mx_RestoreCursor", ""
          Exit Sub
     End If   
     // 恢复光标
     MxDrawX1.Call "Mx_RestoreCursor", ""