vb screensavers ?

[R LAWSON]

Hi everbody!
can anyone tell me if it is possible to create simple screensavers in VB,and if so how do you actually install AS a screensaver?
Thanks in advance

[PsyVision]

Research !

http://www.planet-source-code.com

[zmerlinz]

i know that if you rename your program to .scr and put it in the windows directory then you can use it as a screensaver but i don't know how you put the code in for a settings button.

Merlin ¿

[da404LewZer]

Make a new project with 3 forms and a module.
rename forms to: Saver Settings & Changepass
In the project properties, set the startup object to "Sub Main"

In the module put this:

Sub Main()
If App.PrevInstance Then   ' If already running, Exit.
End
Else
If InStr(Command$, "/c") = 1 Then 'Show the Settings Dialog
settings.show 1  
ElseIf InStr(Command$, "/a") = 1 Then 'Password button
changepass.show 1
ElseIf InStr(Command$, "/s") = 1 or InStr(Command$, "/S") = 1 Then 'Show the screen saver!
saver.Show 1
Else
End
End If
End If
End Sub

That is just the basics of a screen saver!

Some other code to find that every screen saver needs:[list=1][*] Disable Control-Alt-Delete![*] Disable Start Button[*] Disable Control-Escape[*] Disable Alt-Tab[*] Disable Alt-F4[*] Make mousemove exit saver[*] Make keypress exit saver[*] Add Password Support![*] A GOOD IDEA!! (I have seen so many bad ones)[/list=1]

Oh yea.. I forgot, when Saving as an exe.. rename "EXE" to "SCR" (e.g. "TIGHT.SCR") and after compiled, right click on the file from explorer, and hit install.

Hope This Helped!

Any more questions? E-mail me. LaTerZ

[Edited by da404LewZer on 11-12-2000 at 08:09 PM]

[JoshT]

What's the API call to get Windows to show your screen saver in the Preview box?

Thanks,
Josh

[da404LewZer]

umm.. i will have to get back to you at a later time, cuz i'm kinda in school right now.. hehe, and i dont remember all the code off the top of my head.. i'll have to go throught my "vault" of code when i get home, but i will get back to you soon.

Be Patient!