摘要： 1、先在Project--> Operation ---> Application ---> Appearance，把所有的皮肤都勾选了。2、Uses Vcl.Themes 单元；3、填写代码var li_Count: Integer;begin Randomize; li_Count := High(TStyleManager.StyleNames); TStyleManager.SetStyle(TStyleManager.StyleNames[Random(li_Count)]);end; 阅读全文