Hola,
Creo que te falta el atributo (por decirlo de algún modo) "name" a continuación de "external", de tal modo que con él indiques el procedimiento a que quieres acceder en la DLL que tratas de enlazar. Fíjate en la siguiente declaración:
Código Delphi
[-]
function IsThemeActive : BOOL; external 'uxtheme.dll' name 'IsThemeActive';
¿Lo coges? Pues prueba a ver y nos cuentas qué pasó.