How to create a Windows screen saver with Delphi

Here are some the ff. step on how to create Windows Screen Saver from Delphi project, 1. After the clause {$D SCRNSAVE} add (*.dpr) in the project file. 2. Set the Application.OnMessage to a method that controls the deactivation of the screen saver and Set the Application.OnIdle. 3. Set the Windowstate to wsMaximize. 4. Command line should be tested for /c and /s. 5. Compile the program, and rename the .exe to .scr.