Industrial: Add property ScaleMax to TA3nalogGauge, deprecate Scale.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7047 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2019-07-17 20:21:25 +00:00
parent c48d965095
commit bb5e3780f2

View File

@ -202,6 +202,8 @@ type
property Position: Single property Position: Single
read FPosition write SetPosition; read FPosition write SetPosition;
property Scale: Integer property Scale: Integer
read FScaleMaxValue write SetScaleMaxValue default 100; deprecated 'Use ScaleMax instead';
property ScaleMax: Integer
read FScaleMaxValue write SetScaleMaxValue default 100; read FScaleMaxValue write SetScaleMaxValue default 100;
property ScaleMin: Integer property ScaleMin: Integer
read FScaleMinValue write SetScaleMinValue default 0; read FScaleMinValue write SetScaleMinValue default 0;