Buenas perdon por la demora pero no he podido provar la aplicacion en un win2000 hasta hoy.
Me da un casque si utilizo directament la funcion
Código Delphi
[-]LoadLibrary('uxtheme.dll')
en una maquina que no tiene windows xp.
Lo que provaré ahora es poner la instrucción en un try except i capturar-lo por aqui.
Os digo como funciona.