Re: Which WinXP Theme is in use?

[Aaron Ballman <aaron at realsoftware dot com>]

> Thanks Aaron... can you think of any reason that GetCurrentThemeName  
> would return three empty strings? Looks like the code should work  but.....
Off the cuff --

1) uxtheme is not installed in the usual spot
2) No theme is active, perhaps
3) You're not running a themed version of Windows
4) All three fields are too short to hold the entire string
5) Gremlins

Try putting this after the call to GetCurrentThemeName:

Declare Function GetLastError Lib "kernel32" () as Integer
MsgBox Str( GetLastError )

And report what it has to say.

~Aaron
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>