>>>I just tried your code and the timer still dosen't fire. Thanks for the idea.
>>
>>Nothing was set to happen in my example. It was to to show how to put a timer on a toolbar. The following will trigger a messagebox.
>>
>>

>>Public oTool
>>oTool=Createobject("myToolbar")
>>oTool.AddObject("timer1","timer1")
>>oTool.Show()
>>Define Class mytoolbar As Toolbar
>>	Caption = "Toolbar1"
>>	Name = "mytoolbar"
>>Enddefine
>>Define Class timer1 As Timer
>>	Top = 5
>>	Left = 5
>>	Height = 23
>>	Width = 23
>>	Name = "Timer1"
>>	Interval = 10000
>>	Procedure Timer
>>	    Messagebox("The timer is on!!")
>>        Endproc
>>Enddefine
>>

>>
>
>I am sorry I should have explained that I changed the code a little to be similar to the above example but still nothing is displayed. I am using VFP5, it seems to work fine in 7. Is this a know issue with 5?


It may have been related to Timers not firing with the menu system dropped down. You do have the last service pack for VFP 5 installed, don't you? VS97/SP3 http://msdn.microsoft.com/vstudio/downloads/updates/sp/vs97/default.aspx