Delphi Tips

Disable Ctrl Alt Del and Alt Tab

The program should be nice and small so it can load before a user can hit CTRL-ALT-DEL.

Solution:Compile a single WIN32API call into a small .exe in delphi.


program small;
{written by rleigh@deakin.edu.au">Richard Leigh, Deakin Univesity}

uses WinProcs;

{$R *.RES}

var
   Dummy : integer;

begin
  Dummy := 0;
  {Disable ALT-TAB}
  SystemParametersInfo( SPI_SETFASTTASKSWITCH, 1, @Dummy, 0);
  {Disable CTRL-ALT-DEL}
  SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @Dummy, 0);
end.



Back to Index of Tips