Solved

Stop screen saver.

Posted on 2000-03-20
7
280 Views
Last Modified: 2011-10-03
How to stop a started screen saver?
If the screen saver is password protected, how to stop it?
Thx.
0
Comment
Question by:nyt
  • 3
  • 2
  • 2
7 Comments
 
LVL 1

Accepted Solution

by:
AttarSoftware earned 50 total points
ID: 2635824
0
 
LVL 2

Expert Comment

by:craig_capel
ID: 2636228
unit Unit1;

 interface

 uses
   Windows, Messages, SysUtils, Classes,
   Graphics, Controls, Forms, Dialogs;

 type
   TForm1 = class(TForm)
   private
     procedure WMSysCommand(var Msg : TWMSysCommand);
               message WM_SYSCOMMAND;
   public
     { Public declarations }
   end;

 var
   Form1: TForm1;

 implementation

 {$R *.DFM}

 procedure TForm1.WMSysCommand(var Msg : TWMSysCommand);
 begin
   //trap the message and set its result to -1
   if (Msg.CmdType = SC_SCREENSAVE) then
     Msg.Result := -1
   else
     inherited;
 end;

 end.

P.S sorry for making this an Answer but i am fed up with people putting answers as comments and taking the points for it, until EE has changed this, i will continue to do this.....  

That code will stop a Screen saver from running, and i'm sure theres a pwl file you can delete to stop the password from working...

Craig C.
0
 
LVL 2

Expert Comment

by:craig_capel
ID: 2636252
oops that should be answers as comments.... where i have put the answer in a comment, but they decide putting there own version of thier code as an answer and the user ignores what i put..... now that i dont like....
0
Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

 
LVL 1

Expert Comment

by:AttarSoftware
ID: 2638311
Not had a good day Craig?

;O)

Tim.
0
 

Author Comment

by:nyt
ID: 2639057
Craig,
I DO accept comments as answer if the comment really works.  Instead of storing in a pwl file, I've heard that the password of the screen saver is stored in the registry.

Tim,
Your "answer" works well......  ;-)
0
 
LVL 2

Expert Comment

by:craig_capel
ID: 2639629
tim, no.... but, may i ask one question?... Tim what exacty was your answer? you were getting points for nothing all than using the search function.... Good idea.... juts post back what the search gives me, and i get the points :) he spent points to give points.... i am not saying this is wrong, but i have to wonder whats going on here.....
0
 

Author Comment

by:nyt
ID: 2639644
That's why only a "C" is given to him.  (The lowest grade of "Accept comment as answer)
If he/she submitted it as answers, I would give "D" even.
Anyway, Craig,  thanks for your help.
0

Featured Post

Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Introduction The parallel port is a very commonly known port, it was widely used to connect a printer to the PC, if you look at the back of your computer, for those who don't have newer computers, there will be a port with 25 pins and a small print…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
Two types of users will appreciate AOMEI Backupper Pro: 1 - Those with PCIe drives (and haven't found cloning software that works on them). 2 - Those who want a fast clone of their boot drive (no re-boots needed) and it can clone your drive wh…

825 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question