Delphi Program Start Screen saver

In some of the more advanced programs, some of the information is secret, then when someone is approaching, you need to start a screen protection, protect their computer data, so we choose the screen protection features of Windows, but the operating system requires us to a certain amount of time without contact with the computer to start the protection program, This is not a real-time effect, so use the following statement to start the Windows screen saver directly:

SendMessage (hwnd_broadcast,wm_syscommand,sc_screensave,0);

Put the above statement in a program's menu, and define a hotkey for the menu, so the next time just press a key to protect their own data.