[求助]请教两个和事件相关的问题
我用的是vb开发工具。有两个问题请教。1。当触发事件类时，当有提示消息框时，提示信息总是在vb所在的界面里，而不再当前操作的cad界面里。必须把vb窗口最大话，在其中的消息框做出选择，再回到cad界面。请问如何解决？也就是焦点自动转换问题。
2。ObjectModified事件中，当创建新的对象也要触发。能够仅仅使改动对象才触发么？
多谢指教。 2、先做一个ActiveXDll
clsEntity类：
Private WithEvents oEntity As AcadEntity
Private Sub oEntity_Modified(ByVal pObject As AutoCAD.IAcadObject)<BR>If pObject.ObjectName = "AcDbCircle" Then<BR>MsgBox pObject.Handle<BR>End If<BR>End Sub
Public Sub GetEntity(Entity As AcadEntity)<BR>Set oEntity = Entity<BR>End Sub<BR>
TlsTest类：
Private Entitys As New Collection<BR>Public Sub Add(Entity As AcadEntity)<BR> Dim oEnt As New clsEntity<BR> oEnt.GetEntity Entity<BR> Entitys.Add oEnt<BR>End Sub<BR>
编译后在VBA这样调用：
Private myTest As New TlsTest
Sub test()<BR>Dim obj As AcadEntity, pnt<BR>ThisDrawing.Utility.GetEntity obj, pnt<BR>myTest.Add obj<BR>End Sub<BR>
用上面的代码选择圆
改变圆的属性时会弹出该圆的Handle 基本上看明白了。 还得再研究一下。
谢谢飞狐兄。
页:
[1]