TValueIndicator v1.0 - Delphi component SOURCE CODE INCLUDED!!!! Written by Chris Kokkos, August 1995, Greece. --------------------------------------------------------- This is a special use gauge/indicator component for those who want a value to step up through 3 sections. It draws each section with its color and you can define where each stage ends in the bar. It can be used for resource indicators with 3 colors: green, yellow and red. So, the user can easily see if his resources gone very low, that is when the bar has gone far left to the left. It is more easy to use it than it sounds. FREEWARE!!!! - These components are totaly free (in their current version). It may have some bugs though, so be careful, test it before you use it and please send me a mail if/when you find any bugs. Here is some info for the new components: *** New Properties: Border3D (Boolean) Draws a 3d frame like Win95 controls. Border (Boolean) Draws a black frame inside the 3D frame. FirstPoint (Longint) Defines the first point, that's where the first section ends. SecondPoint (Longint) Defines the second point, that's where the second section end and the last one starts. Indicator (Longint) It is the known 'Progress' property from TGauge. (I changed it 'cause i hate to call the Value of a gauge 'Progress'. It may have been anything else but that name... I liked 'Indicator'). Kind (Set) It can take the values (ikHorizontal, ikVertical) and draws the bar left-->right or bottom-->top. MaxValue (Longint) Defines the Maximum value of the Indicator (like TGauge). MinValue (Longint) Defines the Minimum value of the Indicator (like TGauge). Part1Color (TColor) Part2Color (TColor) Part3Color (TColor) Set these properties to change the color for each section of the bar. Choose close colors for best results (eg. dark blue,blue and cyan). Part1 is the left/bottom part and Part3 the right/ top part, according to the Kind property. --------------------------- TValueIndicator Advanced Software Development Created by Chris Kokkos, August '95. Athens, Greece. If you use these components in your applications please include the usual credits in your "About.." dialog box. For any info or suggestions please feel free to write to: Beat@hellas.hol.gr