Nechapu, proc bys z toho musel mit 400kB exe. Napises to jako konzolovou aplikaci a budes z toho mit 15kB EXE bez jakekoliv komprese. Na odesilani zprav nepotrebujes delat zadnou vlastni aplikaci TForm. Tady mas cely zdrojak:

program Project1;

uses
  Messages, Windows, SysUtils;

begin
  SendMessage(0, WM_SYSCOMMAND, SC_MONITORPOWER, 1);
end.