From bb5e3780f234bb39a12dcd9f94560b4a1cb978c5 Mon Sep 17 00:00:00 2001 From: wp_xxyyzz Date: Wed, 17 Jul 2019 20:21:25 +0000 Subject: [PATCH] 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 --- components/industrialstuff/source/a3naloggauge.pas | 2 ++ 1 file changed, 2 insertions(+) diff --git a/components/industrialstuff/source/a3naloggauge.pas b/components/industrialstuff/source/a3naloggauge.pas index ccea93f6c..f41e5e60a 100644 --- a/components/industrialstuff/source/a3naloggauge.pas +++ b/components/industrialstuff/source/a3naloggauge.pas @@ -202,6 +202,8 @@ type property Position: Single read FPosition write SetPosition; property Scale: Integer + read FScaleMaxValue write SetScaleMaxValue default 100; deprecated 'Use ScaleMax instead'; + property ScaleMax: Integer read FScaleMaxValue write SetScaleMaxValue default 100; property ScaleMin: Integer read FScaleMinValue write SetScaleMinValue default 0;