Changing FireMonkey Styles for all or for some FireMonkey components, the Style Designer, content of a.STYLE file, setting then StyleLookup property, predefined styles in Delphi XE2.
Developer Sarina DuPont from Embarcadero has a blog post up showcasing a new Windows 10 style for Delphi XE8. One of the great things about Firemonkey is it’s ability to deploy the platform style to each of the supported platforms (Android, IOS, OSX, and Windows) and this brings that support to the Windows 10 platform. On the other hand you can use premium styles to create a universal look for your app across all four platforms. The Windows 10 style is originally for VCL but if you load it up in the Bitmap Style Designer you can save it out to a Firemonkey style file. Once it is a Firemonkey style you can load it up into a TStyleBook or open it in the Firemonkey Style Designer if needed. The window chrome in Windows 10 is slightly different from previous versions so this gives you that window chrome in your Firemonkey apps in addition to the other UI changes. Having this style lets you get a head start on making sure that your Firemonkey app looks and works correctly on Windows 10. Marco Cantu also has a blog post up where he talks about Windows 10 support in Delphi XE8. You should also be able to use this style in Appmethod and C++Builder.
Instructions to install the Windows 10 style in Firemonkey:
2 4 6 | 1.Withthe Master view selected,addaTStyleBook component toyour form 2.Onthe Master view,select Windows asthe Master style from the toolbar drop-down menu andthenload the Windows10style tothe StyleBook.When working withcustom styles,each view must haveastyle,including the Master view.Setthe StyleBook propertyonthe Form toStyleBook1. 3.Switchtoeach ofyour created Windows views(i.e.Surface Pro andWindows Desktop)andselect the TStyleBook component onthat view andload the custom Windows10style tothe StyleBook. 4.Ifyour applicationconsists ofmultiple forms,you can setTStyleBook.UseStyleManager=Trueineach view inorder touse the same custom styles forall other forms atruntime.IfTStyleBook.UseStyleManager=Trueisset,thencustom styles fully overridesystem styles inall other forms(Form2,Form3 etc.)that are part ofyour applicationforthat particular platform.IfTStyleBook.UseStyleManager=Falseisset,thennewforms(Form2,Form3 etc.)will use the defaultplatformstyle andforcustomization,you must add TStyleBook toForm2's'Master'view andload each custom style again forall created views ofthe additional forms that are part ofyour application. |
Update:Download the official Windows 10 style for Delphi XE8 Firemonkey from Embarcadero Code Central.
Or download the free Windows 10 VCL style for Delphi XE8 from Embarcadero Code Central.