Topic: App Events not working

[Keith™]

OK, this is a very naive question:

Jeff:

In the exposeappevents module
You have the code

Code: [Select]

Dim AppEvents As New EventsClass
-----------------------------------------
Sub acadstartup()
 
Set AppEvents.ACADApp = Application

End Sub

I understand that you made a new class module but what is actually triggering it (acadstartup)?

THanks

Mark

It doesn't need to be triggered, outside of AutoCAD starting up.

[ML]

Sorry, I meant to say a new class, not class module.

So you are saying that when ACAD starts, it calls the macro?

Mark

[ML]

Which then triggers The ACADapp?

Mark

[Keith™]

yep

[Jeff_M]

To expand on Keith's excellent reply

Just as Acad will autoload any acad.lsp, acaddoc.lsp, acad.rx acad.dvb, S::STARTUP (in lisp), and any associated MNL files, it will run an AcadStartup Sub in the now loaded Acad.dvb

[ML]

Yeah Keith's explanation was pretty profound

Yep

LOL, I am just kidding Keith. Keith has been a GREAT help to me over the years, I owe him a great bit of gratitude.

Jeff, that was an excellent explanation, thank you

That really clarified a lot for me 

I appreciate all your help!

Mark

[ML]

Jeff,

You are a Land Desktop user.
With Land Desktop is it still necessary to use the acad.rx file to load the acvba.arx file in order to initialize VBA on startup?

Thank you

Mark

[Jeff_M]

Yep

[ML]

Cool!

It looks like we've clarified this "event"  LOL   

Thank you

[ML]

Hey Jeff:

Pretty cool,

Branching out on The plot Event that you included
I added some VBScripting Language into The Plot Event

Mark

Code: [Select]

Private Sub ACADApp_BeginPlot(ByVal DrawingName As String)

Dim WshNetwork
Dim username

Set WshNetwork = CreateObject("WScript.Network")
username = WshNetwork.username


MsgBox "Drawing " & DrawingName & "has just received a request to plot for: " & username

End Sub


[ML]

Jeff,

Also I noticed that sometimes when I make changes to the events, I have to re run my ExposeAppEvents (acadstartup) module

Code: [Select]

Dim AppEvents As New EventsClass

Sub acadstartup()
 
Set AppEvents.ACADApp = Application

End Sub

I don't think that should be necessary, do you?

Thanks

Mark

[Jeff_M]

No, that seems odd. I'm pretty sure that I can make changes and they are immediately used.

[ML]

Please

I would appreciate that   

Mark

[ML]

Oh I'm sorry
I tohught you had a fix
The same situation is still happening???

You would think the event itself would trigger the acadstartup?

Yes, I can have every event handler run acadstartup but this should not be neccessary 

So, you have not encountered this problem?

Mark

[Bryco]

I reset with the AcadDocument_EndCommand "OPEN" and "NEW", notice this is a document level command.
There is also an application level Open and New, but these may not fire.
When you open a new drawing there is a point where thisdrawing changes ownership, this is where the application setting loses it's scope.