Class TfrmSaver (unit screenCode) |
TForm
************************************************************************** ssaver95 -- a delphi screen saver that requires little work to personalize Copyright (C) 1998 under the GNU public license by Christopher Litsinger xopher@interiority.org This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. For more information, check out more information on the copyleft at http://www.gnu.org/copyleft/copyleft.html **************************************************************************
Constructors |
Functions |
disable the system keys
Properties |
Events |
Variables |
Constructors |
Functions |
95 00 00 00
if not pwdMode
no need to use mouseUp, as mouse down pretty much catches it
ignore a couple of movements, then close the screen saver
when the password dialog is moved, just paint the appropriate area
create our nifty little thread
the animation thread
disable the system keys
put this at the top of the zorder
capture and ignore any screen saver execution commands
don't let them do it
Properties |
Events |
Variables |
Private declarations