Message 1 of 6
splash screen and vb6 addin

Not applicable
08-15-2006
05:33 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
I'm trying to load a splash screen for my addin along with the startup splash screen on IV. The IV splash comes on but when mine tries to come thru it just looks like it cuts a hole thru the IV splash screen, and does not fully come on until IV is fully loaded. I currenty have it coded as such, is it in the wrong place?
Private Sub ApplicationAddInServer_Activate(ByVal AddInSiteObject As Inventor.ApplicationAddInSite, ByVal FirstTime As Boolean)
'the activate method is called by Inventor when it loads the addin
'the AddInSiteObject provides access to the Inventor Application object
'the FirstTime flag indicates if the addin is loaded for the first time
'initialize global variables
Set objInventorApp = AddInSiteObject.Application
blnAddInLoadedFirstTime = FirstTime
'add addin activate code here
'e.g. event initialization, command creation etc.
frmSplash.Show
End Sub
Thanks
Wayne
Private Sub ApplicationAddInServer_Activate(ByVal AddInSiteObject As Inventor.ApplicationAddInSite, ByVal FirstTime As Boolean)
'the activate method is called by Inventor when it loads the addin
'the AddInSiteObject provides access to the Inventor Application object
'the FirstTime flag indicates if the addin is loaded for the first time
'initialize global variables
Set objInventorApp = AddInSiteObject.Application
blnAddInLoadedFirstTime = FirstTime
'add addin activate code here
'e.g. event initialization, command creation etc.
frmSplash.Show
End Sub
Thanks
Wayne