I was trying to create an initial splash screen for my application. The code in capp, capplication.showsplash is:
---------------
IF This.lShowSplash
*!*old code commented out
*** EGL: 2002.1.11 19:09 - Make splash a true splash screen
This.oSplash = CREATEOBJECT(This.cSplashFormClass)
IF TYPE("This.oSplash") == "O"
IF EMPTY(This.cSplashCaption)
This.oSplash.Caption = APPNAME_LOC
ELSE
This.oSplash.Caption = This.cSplashCaption
ENDIF
This.oSplash.Show()
_Screen.Visible = .F.
ENDIF
ENDIF
RETURN
--------------
The error I get when I have lshowsplash set to .T. is:
Error #1733 occured in line 20 of showsplash in object avs
Line 20 is:
This.oSplash = CREATEOBJECT(This.cSplashFormClass)
Error #1733 is:
Class definition "name" is not found.
What do I need to do to correct this?
Thanks!
Lynette
ltillner (at) yahoo .DOT com
©2002 Lynette Tillner |
