2 // System.Windows.Forms.Timer
5 // stubbed out by Jackson Harper (jackson@latitudegeo.com)
6 // Dennis Hayes (dennish@raytek.com)
7 // Aleksey Ryabchuk (ryabchuk@yahoo.com)
9 // (C) 2002/3 Ximian, Inc
13 // Permission is hereby granted, free of charge, to any person obtaining
14 // a copy of this software and associated documentation files (the
15 // "Software"), to deal in the Software without restriction, including
16 // without limitation the rights to use, copy, modify, merge, publish,
17 // distribute, sublicense, and/or sell copies of the Software, and to
18 // permit persons to whom the Software is furnished to do so, subject to
19 // the following conditions:
21 // The above copyright notice and this permission notice shall be
22 // included in all copies or substantial portions of the Software.
24 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
25 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
26 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
27 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
28 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
29 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
30 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
33 using System
.ComponentModel
;
34 using System
.Runtime
.InteropServices
;
35 using System
.Collections
;
37 namespace System
.Windows
.Forms
{
40 // Represents a timer that raises an event at user-defined intervals.
42 public class Timer
: Component
{
44 private bool enabled
= false;
45 private int interval
= 100;
46 private uint timerid
= 0;
47 private GCHandle timerHandle
;
48 private Win32
.TimerProc proc
;
53 public Timer( IContainer container
) {
54 container
.Add ( this );
57 public virtual bool Enabled
{
65 Win32
.KillTimer ( IntPtr
.Zero
, timerid
);
67 if ( !timerHandle
.IsAllocated
)
68 timerHandle
= GCHandle
.Alloc( this );
71 proc
= new Win32
.TimerProc( this.TimeProc
);
73 timerid
= Win32
.SetTimer( IntPtr
.Zero
, 0, (uint)Interval
, proc
);
77 Win32
.KillTimer ( IntPtr
.Zero
, timerid
);
81 if ( timerHandle
.IsAllocated
)
93 throw new ArgumentException (
94 string.Format (" '{0}' is not a valid value for Interval. Interval must be greater than 0.",
98 Enabled
= true; // restart
102 public void Start() {
110 public override string ToString()
112 return "[" + GetType().FullName
.ToString() + "], Interval: " + Interval
;
115 public event EventHandler Tick
;
117 protected virtual void OnTick(EventArgs e
)
123 private void TimeProc( IntPtr hwnd
, uint uMsg
, uint idEvent
, int dwTime
)
125 OnTick ( EventArgs
.Empty
);
128 protected override void Dispose( bool disposing
) {
130 base.Dispose ( disposing
);