Duplicate enum type in [AdvPopupButton & AdvSmooth

VCL TMS VCL UI Pack
1

Duplicate enum type in [AdvPopupButton & AdvSmoothLabel]



It would appear that the following components have the same enumerated types:

AdvSmoothPopup.hpp

enum TPopupButtonPosition : unsigned char { bpTopLeft, bpTopRight, bpBottomLeft, bpBottomRight };



AdvSmoothLabel.hpp

enum TAdvSmoothLabelBackGroundPosition : unsigned char { bpTopLeft, bpTopCenter, bpTopRight, bpBottomLeft, bpBottomCenter, bpBottomRight, bpTiled, bpStretched, bpCenterLeft, bpCenterCenter, bpCenterRight };



This produces the following error when both of these components are used - AdvSmoothLabel1 : TAdvSmoothLabel and AdvSmoothPopup1: TAdvSmoothPopup;



Error:

[DCC Error] Unit1.pas(939): E2010 Incompatible types: 'TPopupButtonPosition' and 'TAdvSmoothLabelBackGroundPosition'

2

See FAQ: http://www.tmssoftware.com/site/faq.asp


under: Problem with constants/type names declared in different units with the same name

solution: prefix type with proper namespace
3

Got it. thanks for your help

i.e.

With TMSPopup.Buttons.Add Do

Begin

   Caption := 'Button is here';

   Position := AdvSmoothPopup.bpTopRight;

End;