Vjylku

How long is the D&D Starter Set campaign?

How much mayhem could I cause as a sentient fish?

What's a good word to describe a public place that looks like it wouldn't be rough?

Why do no American passenger airlines still operate dedicated cargo flights?

How do you funnel food off a cutting board?

awk + sum all numbers

Can I string the D&D Starter Set campaign into another module, keeping the same characters?

Which one of these password policies is more secure?

How can I deliver in-universe written lore to players without it being dry exposition?

what does しにみえてる mean?

Blindfold battle as a gladiatorial spectacle - what are the tactics and communication methods?

Am I a Rude Number?

What is the wife of a henpecked husband called?

How to count the characters of jar files by wc

One Half of Ten; A Riddle

Incorporating research and background: How much is too much?

Why zero tolerance on nudity in space?

Why do neural networks need so many training examples to perform?

What are "industrial chops"?

Can a hotel cancel a confirmed reservation?

Why isn't there a non-conducting core wire for high-frequency coil applications

What is the purpose of easy combat scenarios that don't need resource expenditure?

Cat is tipping over bed-side lamps during the night

Why did the villain in the first Men in Black movie care about Earth's Cockroaches?

IViewUpdateEvents issue in microstation connect mvba

0

I have using IViewUpdateEvents events in MicroStation CONNECT Edition. It's rapidly called again and again.After some time MicroStation CONNECT shows stopped working.I am using same code in microstation,it's working fine.I am using following code in my mvba file class.Thank u

 Option Explicit





Private WithEvents m_OpenCloseHooks As MicroStationDGN.Application

'Private oEventHandlers As clsEventHandlers



'Implements IViewUpdateEvents

Private Sub Class_Initialize()

    Set m_OpenCloseHooks = MicroStationDGN.Application

End Sub

'------------------------------------------------------------

'Private Sub Class_Terminate()

' This is executed when an instance of this class is destroyed

Private Sub Class_Terminate()

  'Remove the existing reference, if any, to the current MicroStation session

  Set m_OpenCloseHooks = Nothing

End Sub

Private Sub m_OpenCloseHooks_OnDesignFileOpened(ByVal DesignFileName As String)

   MsgBox "Dgn File is open"

End Sub

Private Sub m_OpenCloseHooks_OnDesignFileClosed(ByVal DesignFileName As String)

  MsgBox "Dgn File is close"

End Sub

Private Sub IViewUpdateEvents_AfterRedraw(TheViews() As View, TheModels() As ModelReference, ByVal DrawMode As MsdDrawingMode)

   MsgBox "After view updation"

End Sub

Private Sub IViewUpdateEvents_BeforeRedraw(TheViews() As View, TheModels() As ModelReference, ByVal DrawMode As MsdDrawingMode)

  MsgBox "Before View updation"

End Sub

microstation

share

asked 2 mins ago

RajaRaja

1

New contributor

Raja is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

add a comment | 

0

I have using IViewUpdateEvents events in MicroStation CONNECT Edition. It's rapidly called again and again.After some time MicroStation CONNECT shows stopped working.I am using same code in microstation,it's working fine.I am using following code in my mvba file class.Thank u

 Option Explicit





Private WithEvents m_OpenCloseHooks As MicroStationDGN.Application

'Private oEventHandlers As clsEventHandlers



'Implements IViewUpdateEvents

Private Sub Class_Initialize()

    Set m_OpenCloseHooks = MicroStationDGN.Application

End Sub

'------------------------------------------------------------

'Private Sub Class_Terminate()

' This is executed when an instance of this class is destroyed

Private Sub Class_Terminate()

  'Remove the existing reference, if any, to the current MicroStation session

  Set m_OpenCloseHooks = Nothing

End Sub

Private Sub m_OpenCloseHooks_OnDesignFileOpened(ByVal DesignFileName As String)

   MsgBox "Dgn File is open"

End Sub

Private Sub m_OpenCloseHooks_OnDesignFileClosed(ByVal DesignFileName As String)

  MsgBox "Dgn File is close"

End Sub

Private Sub IViewUpdateEvents_AfterRedraw(TheViews() As View, TheModels() As ModelReference, ByVal DrawMode As MsdDrawingMode)

   MsgBox "After view updation"

End Sub

Private Sub IViewUpdateEvents_BeforeRedraw(TheViews() As View, TheModels() As ModelReference, ByVal DrawMode As MsdDrawingMode)

  MsgBox "Before View updation"

End Sub

microstation

share

asked 2 mins ago

RajaRaja

1

New contributor

Raja is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

add a comment | 

I have using IViewUpdateEvents events in MicroStation CONNECT Edition. It's rapidly called again and again.After some time MicroStation CONNECT shows stopped working.I am using same code in microstation,it's working fine.I am using following code in my mvba file class.Thank u

 Option Explicit





Private WithEvents m_OpenCloseHooks As MicroStationDGN.Application

'Private oEventHandlers As clsEventHandlers



'Implements IViewUpdateEvents

Private Sub Class_Initialize()

    Set m_OpenCloseHooks = MicroStationDGN.Application

End Sub

'------------------------------------------------------------

'Private Sub Class_Terminate()

' This is executed when an instance of this class is destroyed

Private Sub Class_Terminate()

  'Remove the existing reference, if any, to the current MicroStation session

  Set m_OpenCloseHooks = Nothing

End Sub

Private Sub m_OpenCloseHooks_OnDesignFileOpened(ByVal DesignFileName As String)

   MsgBox "Dgn File is open"

End Sub

Private Sub m_OpenCloseHooks_OnDesignFileClosed(ByVal DesignFileName As String)

  MsgBox "Dgn File is close"

End Sub

Private Sub IViewUpdateEvents_AfterRedraw(TheViews() As View, TheModels() As ModelReference, ByVal DrawMode As MsdDrawingMode)

   MsgBox "After view updation"

End Sub

Private Sub IViewUpdateEvents_BeforeRedraw(TheViews() As View, TheModels() As ModelReference, ByVal DrawMode As MsdDrawingMode)

  MsgBox "Before View updation"

End Sub

microstation

share

asked 2 mins ago

RajaRaja

1

New contributor

Raja is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

 Option Explicit





Private WithEvents m_OpenCloseHooks As MicroStationDGN.Application

'Private oEventHandlers As clsEventHandlers



'Implements IViewUpdateEvents

Private Sub Class_Initialize()

    Set m_OpenCloseHooks = MicroStationDGN.Application

End Sub

'------------------------------------------------------------

'Private Sub Class_Terminate()

' This is executed when an instance of this class is destroyed

Private Sub Class_Terminate()

  'Remove the existing reference, if any, to the current MicroStation session

  Set m_OpenCloseHooks = Nothing

End Sub

Private Sub m_OpenCloseHooks_OnDesignFileOpened(ByVal DesignFileName As String)

   MsgBox "Dgn File is open"

End Sub

Private Sub m_OpenCloseHooks_OnDesignFileClosed(ByVal DesignFileName As String)

  MsgBox "Dgn File is close"

End Sub

Private Sub IViewUpdateEvents_AfterRedraw(TheViews() As View, TheModels() As ModelReference, ByVal DrawMode As MsdDrawingMode)

   MsgBox "After view updation"

End Sub

Private Sub IViewUpdateEvents_BeforeRedraw(TheViews() As View, TheModels() As ModelReference, ByVal DrawMode As MsdDrawingMode)

  MsgBox "Before View updation"

End Sub

share

asked 2 mins ago

RajaRaja

1

New contributor

Raja is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

share

asked 2 mins ago

RajaRaja

1

New contributor

Raja is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

asked 2 mins ago

RajaRaja

1

New contributor

Raja is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

asked 2 mins ago

RajaRaja

1