Delphi和Windows主题相关的报错

写了一个非常简单的EXE，静态调用一个Dll

不执行DLL中的内容直接推出就报错

---------------------------
Application Error
---------------------------
Exception EAccessViolation in module uxtheme.dll at 00001531.

Access violation at address 5ADC1531 in module 'uxtheme.dll'. Read of address 00000014.

---------------------------
确定  
---------------------------

 

 

后来将Windows风格换为“经典”，错误消失。

原因，正在查找中。。。。。