Information générale
Catégorie:
Codage, syntaxe et commandes
Titre:
Flashing minimized title bar
Versions des environnements
This procedure is supposed to flash the minimised title bar. at least that is my intention. I have it in the timer event.
firstly i dont know if this is the ideal approach,
secondly the line _screen.icon=.... just makes my computer slow down to such an extent that i cannot even stop the process from the taskbar.
what am i doing wrong, what is a better approach?
Lcnts=.t.
do whil Lcnts
Ltm=right(time(),2)
Ltmv=val(Ltm)
if int(Ltmv/2)=(Ltmv/2)
_screen.caption=''
_screen.icon='\picture\disk06.ico'
else
_screen.caption='Something Else Here'
_screen.icon=''
endif
Lws=_screen.windowstate
if Lws=2
Lcnts=.f.
endif
enddo
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement