Class TSaverThread (unit savThr)

Inherits from

TSaverBasics

this is the sample saver used in this project, you should change the implementation of this class to your own needs

Constructors


constructor Create (ACanvas : TCanvas; DrawRect : TRect);

Part 2 definition of the TSaverThread for this sample} {this is only commented to show what to override to TSaverBasics


Functions

procedure AStep;

my screen saver is here: every step, clears one line from display, or shows one line it repaints certain rectangles given in ForceRect according to actual display status of my saver.

Properties

Events

Variables

Direction : Integer;


Mode : Integer;


Position : Integer;



Constructors


constructor Create (ACanvas : TCanvas; DrawRect : TRect);

Part 2 definition of the TSaverThread for this sample} {this is only commented to show what to override to TSaverBasics


Functions


procedure AStep;

my screen saver is here: every step, clears one line from display, or shows one line it repaints certain rectangles given in ForceRect according to actual display status of my saver. move the password dialog around the running saver and you will see that it works


Properties


Events


Variables


Direction : Integer;


Mode : Integer;


Position : Integer;