Martin wrote: > make it > if (Application<>nil) and > (abs(LastProcessMessages-Now)>((1/86400)/10)) This does not make much difference on my system. :-( Regards, - Graeme - -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://opensoft.homeip.net/fpgui/