Which line of code do you get error on?
Why do you instantiating ThemesManager before quitting?

>
>I am using themedcontrols by Emerson Santon Reed.
>These are working fine.
>
>To exit, when I execute these codes
>
>

>If Vartype(_Screen.ThemesManager)=="O"
>		_Screen.RemoveObject("ThemesManager")
> endif
>_Screen.Newobject("ThemesManager","ThemesManager")
>
>CLEAR EVENTS
>Close All
>QUIT
>

>
>Then It displays this error message.
>
>See Image 1
>
>You can see mentiond file located in directory
>
>See Image2
>
>How to overcome this problem?
>
>Please help