cumtjh 发表于 2011-3-12 00:14:31

如何屏蔽Fstl_DoubleClickNo 双击跳出飞诗窗口

如何屏蔽Fstl_DoubleClickNo 双击跳出飞诗窗口

我用VBA 编程双击屏幕中任意对象时，都会跳出飞诗工具窗口，如何屏蔽

Public Sub AcadDocument_BeginDoubleClick(ByVal PickPoint As Variant)
    If PickfirstSelectionSet.count <> 1 Then GoTo ToExit
    Select Case PickfirstSelectionSet.Item(0).ObjectName
Case "AcDbAlignedDimension", "AcDbRotatedDimension", "AcDbDiametricDimension", "AcDbRadialDimension", "AcDb2LineAngularDimension", "AcDb3PointAngularDimension"
……
       Case Else
    End Select
End Sub

飞诗大哥如何让飞诗不响应呀我试了很多方法都不行


http://bbs.mjtd.com/xwb/images/bgimg/icon_logo.png 该贴已经同步到 cumtjh的微博

fsxm 发表于 2011-3-14 18:21:56

fstl　管理面板－设定－双击空白
这项空白就ＯＫ了

cumtjh 发表于 2011-3-15 10:53:57

感谢大哥，我是飞诗fans，一直会关注并支持的您的杰作

cumtjh 发表于 2011-3-15 10:54:38

问题解决啦

slzlfs 发表于 2011-3-18 07:51:45

哦 原来这样
页: [1]
查看完整版本: 如何屏蔽Fstl_DoubleClickNo 双击跳出飞诗窗口