AdvMenuStyler.Pas won't compile

VCL TMS VCL UI Pack
1
Delphi 10.2.3
Latest TMS Component Pack

Since installing the latest TMS component Pack yesterday my app won't compile (have also tried a rebuild and reinstallation of the Component Pack) with the following error:


[dcc32 Error] AdvMenuStylers.pas(265): E2003 Undeclared identifier: 'tsWindowsVista'
[dcc32 Error] AdvMenuStylers.pas(265): E2030 Duplicate case label
[dcc32 Error] AdvMenuStylers.pas(266): E2003 Undeclared identifier: 'tsWindows7'
[dcc32 Error] AdvMenuStylers.pas(267): E2003 Undeclared identifier: 'tsWindows8'
[dcc32 Error] AdvMenuStylers.pas(268): E2003 Undeclared identifier: 'tsWindows10'
[dcc32 Error] AdvMenuStylers.pas(268): E2030 Duplicate case label
[dcc32 Error] AdvMenuStylers.pas(269): E2003 Undeclared identifier: 'tsTerminal'
[dcc32 Error] AdvMenuStylers.pas(270): E2003 Undeclared identifier: 'tsOffice2010Blue'
[dcc32 Error] AdvMenuStylers.pas(270): E2030 Duplicate case label
[dcc32 Error] AdvMenuStylers.pas(271): E2003 Undeclared identifier: 'tsOffice2010Silver'
[dcc32 Error] AdvMenuStylers.pas(271): E2030 Duplicate case label
[dcc32 Error] AdvMenuStylers.pas(272): E2003 Undeclared identifier: 'tsOffice2010Black'
[dcc32 Error] AdvMenuStylers.pas(272): E2030 Duplicate case label
[dcc32 Error] AdvMenuStylers.pas(273): E2003 Undeclared identifier: 'tsOffice2013White'
[dcc32 Error] AdvMenuStylers.pas(273): E2030 Duplicate case label
[dcc32 Error] AdvMenuStylers.pas(274): E2003 Undeclared identifier: 'tsOffice2013LightGray'
[dcc32 Error] AdvMenuStylers.pas(274): E2030 Duplicate case label
[dcc32 Error] AdvMenuStylers.pas(275): E2003 Undeclared identifier: 'tsOffice2013Gray'
[dcc32 Error] AdvMenuStylers.pas(275): E2030 Duplicate case label
[dcc32 Error] AdvMenuStylers.pas(276): E2003 Undeclared identifier: 'tsOffice2016White'
[dcc32 Error] AdvMenuStylers.pas(276): E2030 Duplicate case label
[dcc32 Error] AdvMenuStylers.pas(277): E2003 Undeclared identifier: 'tsOffice2016Gray'
[dcc32 Error] AdvMenuStylers.pas(277): E2030 Duplicate case label
[dcc32 Error] AdvMenuStylers.pas(278): E2003 Undeclared identifier: 'tsOffice2016Black'
[dcc32 Error] AdvMenuStylers.pas(278): E2030 Duplicate case label
[dcc32 Fatal Error] Main.pas(6): F2063 Could not compile used unit 'AdvMenuStylers.pas'
Failed
Elapsed time: 00:00:21.3

Please help.

regards

Bill
2

Can you scan your hard disk for old versions of advstyleif.pas and make sure old version copies are removed?

3
Thanks for that Bruno.  

Found that file in 3 places......TMS Component Pack directory (was latest date), one of the component pack demo directories and the TMS Intraweb directory.  Each was a different file date...the Intraweb file date was 2013 (but only downloaded and installed last weekend).  Kept the latest date file and deleted the others.  Application compiles Ok now.  

Should I place a copy of that file back into the Intraweb directory?

thanks

Bill
4

You can put the latest version in the IntraWeb folder too, it should not harm.