screen saver in vb6.0
-
Dear Team Members, I am stuck at a point and so desire to be helped out of loop. I want to implement a screen saver application with my vb6.0 application. It is for touch screen enabled application .....so no keyboard but only Numberpad. If a user does not touch the screen for period of 30 seconds , the screen saver is envoked and it remains till the user touches the screen again. How do I check the idle time .. It goes like .........
if no_mouse_event & timeinterval=30 do call routine screensaver loop untill no_mouse_event=FALSE endif:confused: I guess, I have understood what i wanted but my inexperienced programming tact make me a sufferer. Can any :cool: soft hearted do the favor :rose: to me. Xtrisk........ -
Dear Team Members, I am stuck at a point and so desire to be helped out of loop. I want to implement a screen saver application with my vb6.0 application. It is for touch screen enabled application .....so no keyboard but only Numberpad. If a user does not touch the screen for period of 30 seconds , the screen saver is envoked and it remains till the user touches the screen again. How do I check the idle time .. It goes like .........
if no_mouse_event & timeinterval=30 do call routine screensaver loop untill no_mouse_event=FALSE endif:confused: I guess, I have understood what i wanted but my inexperienced programming tact make me a sufferer. Can any :cool: soft hearted do the favor :rose: to me. Xtrisk........I don't know what OS this for, but in 2000 & XP there is a function called GetLastInputInfo. The function parameter is LASTINPUTINFO structure:
Private Type LASTINPUTINFO cbSize As Long ' = 8 dwTime As Long End TypeAs far as the time you can add a windows timer (SetTimer) or add a timer control (vb) You can compare the LASTINPUTINFO.dwTime against GetTickCount() function to calculate the time elapsed. Hope this helps:) iluha