I played with uskin years back and I never got it to work satisfactorily with my apps. Could just be me, but personally I think it's more trouble than it's worth. I was originally looking for a way to make BlueGUI projects `fit in` better with XP & Windows 7 default themes. On XP, a seperate manifest file was required to give it the default XP skin, but these didn't work on Vista or Win7.
Luckily, a clever guy sussed out how to hack the dbcompiler.exe file to include the correct manifest information and I have been using that ever since with no problems. (Especially since DBPro and dbcompiler.exe have not been updated for ages)
http://forum.thegamecreators.com/?m=forum_view&t=187492&b=18
I also wrote a quick program to automatically change the manifest strings. ***USE AT YOUR OWN RISK AND MAKE SURE YOU ARE SURE BEFORE RUNNING IT - BACKUP YOUR PROJECTS AND DBPRO FOLDER ****
All it does is modify the dbcompiler.exe to the correct resource string, and create a backup of the original.
Hope it helps!
Edit: Forgot to include the code
new$="<dependency><dependentAssembly><assemblyIdentity type="+chr$(34)+"Win32"+chr$(34)+" name="+chr$(34)+"Microsoft.Windows.Common-Controls"+chr$(34)+" version="+chr$(34)+"6.0.0.0"+chr$(34)+" processorArchitecture="+chr$(34)+"*"+chr$(34)+" publicKeyToken="+chr$(34)+"6595b64144ccf1df"+chr$(34)+" language="+chr$(34)+"*"+chr$(34)+"></assemblyIdentity></dependentAssembly></dependency>"
`Manual path to your dbcompiler.exe here
file$="C:\Program Files (x86)\The Game Creators\Dark Basic Professional\Compiler\DBPCompiler.exe"
`Uncomment to use Bluegui file selector to dbcompiler.exe
`file$=openDialog("Open DBCompiler.exe","Executables (*.exe)",0,"")
if file exist(file$)
make bank from file 1,file$
offset=search bank(1,"asInvoker")
if offset>0
offset=search bank(1,"<assembly xml")
if offset>0
beginOffset=search bank(1,">",offset)
if beginOffset>0
endOffset=search bank(1,"</assembly>",beginOffset+len(new$))
if endOffset>0 and endOffset-beginOffset<512
write bank string 1,beginOffset+1,new$,len(new$)
for ptr=beginOffset+1+len(new$) to endOffset-1
write bank byte 1,ptr,32
next ptr
`uncomment these 2 lines to actually modify the file
` rename file file$,file$+".orig"
` make file from bank file$,1
Print "Done"
endif
endif
endif
endif
endif
wait key
