Delphi - Az Alt+Tab és a Ctrl+Esc billentyű kombináció engedélyezése/letiltása

forráskód letöltése
Egy egyszerű trükkel megoldható, hogy a címben említett két billentyűkombinációt letiltsuk és ezzel megakadályozzuk azt, hogy a felhasználó az egyik programról átváltson egy másikra, vagy új alkalmazást indítson el. A trükk lényege abból áll, hogy el kell hitetni a Windows-al, hogy éppen egy képernyővédő fut. Ekkor ugyanis a két fenti billentyű kombináció a rendszer által letiltásra kerül.

A SystemParametersInfo függvényt használhatjuk erre a célra. Első paraméterként a SPI_SCREENSAVERRUNNING konstanst kell használnunk. Második paraméterként, ha nullát adunk, vagyis hamis értéket, akkor a rendszer úgy tudja, hogy nem fut képernyővédő. Ha viszont nullától különböző értéket adunk, vagyis igazat, akkor a rendszer letiltja a két billentyűkombinációt.