[JEDI.NET-commits] dev/jedi_mbe/run Jedi.Windows.Forms.Hmi.Leds.pas,1.3,1.4
Status: Pre-Alpha
Brought to you by:
jedi_mbe
From: Marcel B. <jed...@us...> - 2004-11-28 14:46:08
|
Update of /cvsroot/jedidotnet/dev/jedi_mbe/run In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11191/dev/jedi_mbe/run Modified Files: Jedi.Windows.Forms.Hmi.Leds.pas Log Message: Moved to personal dev folder for now. Index: Jedi.Windows.Forms.Hmi.Leds.pas =================================================================== RCS file: /cvsroot/jedidotnet/dev/jedi_mbe/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 16 Jun 2004 13:55:34 -0000 1.3 --- Jedi.Windows.Forms.Hmi.Leds.pas 28 Nov 2004 14:45:58 -0000 1.4 *************** *** 44,54 **** {$REGION 'Led styles and states'} type LedStateCollection = class; LedStyleBase = class; ! LedStateBase = class; ! LedState = class; LedFrameStyle = (None, Flush, Sunken, Raised); LedStateCollection = class sealed (InlineCollectionBase) [...2209 lines suppressed...] + + {$REGION 'Designer Managed Code'} + procedure LedProgressBar.InitializeComponent; + begin + Self.Name := 'LedProgressBar'; + end; + + procedure LedProgressBar.Dispose(Disposing: Boolean); + begin + if Disposing then + begin + if Components <> nil then + Components.Dispose(); + end; + inherited Dispose(Disposing); + end; + {$ENDREGION} + {$ENDREGION} + end. |