Articles:

• OLE Error: CoInitialize has not been called (45225)
• Disable Ctrl-Alt-Del and Alt-Tab (29177)
• Hide your application in Windows' task manager (27567)
• How can I create a system wide keyboard hook under Win32? (39486)
• QueryPerformanceCounter() vs. GetTickCount() (36509)
• Hooking into Windows API calls (21345)
• Execute and wait for termination (16 and 32bit applications) (14998)
• Retrieving Addresses from MS Outlook (14751)
• Detect your own IP Address (36542)
• Determine the processor speed in MHz (27117)
• Shared memory (Delphi 32bit) (20272)
• Dynamic loading and binding of DLLs (19183)
• Beep/ Sound in Delphi (19172)
• API-function for console command NET SEND (18190)
• Handle Excel through OLE Automation (18064)
• Windows is set to small or large fonts? (17701)
• How to create a Windows screen saver with Delphi (16372)
• Delphi controls MS Office applications (16063)
• Create a GUID at runtime (15901)
• Changes in WIN.INI / the registry (14553)
• Pitfalls reading from the Registry (ProxyEnable) (14384)
• Share memory among several instances of a DLL (13854)
• Play WAV files (13476)
• Difference between time zones (13372)
• Create a process that cannot be terminated (12907)
• Adjust the Windows NT privileges to reboot (12078)
• Control NOTEPAD (11819)
• Use a WAVE file as a resource in your EXE (11611)
• Recognize frozen applications (Watchdog) (11508)
• Read environment variables (11293)
• Add a bitmap to a menu item (11167)
• Enumerating Borland Application Servers (10716)
• How to register an OCX (21380)
• Starting and stopping Windows services (17840)
• Detect whether there is a sound card installed (17777)
• Detect an Windows Administrator Login (17550)
• Hide a process in the 'kill task menu' (17477)
• GetLastError: Last error code (17275)
• How to execute MSINFO32 (15933)
• How to have an EXE file delete itself (15910)

How do I switch the monitor on/ off using ObjectPascal? Provided that you monitor supports this interface, you can use the new system command message SC_MONITORPOWER as shown in the following function: // Power saver mode interface procedure SwitchMonitorOn (on : boolean); const lp : array [false..true] of longint = (0, -1); begin SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, lp[on]); end;