[JEDI.NET-commits] main/run Jedi.Windows.Forms.Hmi.Leds.pas,1.3,1.4

[Marcel B. <jed...@us...>]

Update of /cvsroot/jedidotnet/main/run
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9387/main/run

Modified Files:
	Jedi.Windows.Forms.Hmi.Leds.pas 
Log Message:
* AutoSize defaults to True.
* Applied DefaultValue attribute to AutoSize and BlinkInterval

Index: Jedi.Windows.Forms.Hmi.Leds.pas
===================================================================
RCS file: /cvsroot/jedidotnet/main/run/Jedi.Windows.Forms.Hmi.Leds.pas,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** Jedi.Windows.Forms.Hmi.Leds.pas	3 Aug 2004 14:47:27 -0000	1.3
--- Jedi.Windows.Forms.Hmi.Leds.pas	4 Aug 2004 08:23:12 -0000	1.4
***************
*** 569,575 ****
      {$ENDREGION}
    published
!     [Category('Behavior'), Description('Specifies if the control resizes to the size of the led.')]
      property AutoSize: Boolean read FAutoSize write set_AutoSize;
!     [Category('Behavior'), Description('Blinking interval in ms. Use 0 to disable blinking.')]
      property BlinkInterval: Double read get_BlinkInterval write set_BlinkInterval;
      [Category('Behavior'), Description('State of the led.')]
--- 569,575 ----
      {$ENDREGION}
    published
!     [Category('Behavior'), Description('Specifies if the control resizes to the size of the led.'), DefaultValue(True)]
      property AutoSize: Boolean read FAutoSize write set_AutoSize;
!     [Category('Behavior'), Description('Blinking interval in ms. Use 0 to disable blinking.'), DefaultValue(0.0)]
      property BlinkInterval: Double read get_BlinkInterval write set_BlinkInterval;
      [Category('Behavior'), Description('State of the led.')]
***************
*** 2257,2260 ****
--- 2257,2261 ----
    LedStyle := SingleColorNormalLedStyle.Create;
    LedState := LedStyle.States[1];
+   AutoSize := True;
    FBlinkTimer := System.Timers.Timer.Create;
    Include(FBlinkTimer.Elapsed, BlinkTimer_Elapsed);