Одним из решений поставленной задачи будет использование системного сообщения WM_SYSCOMMAND с указанием команды SC_MONITORPOWER. В документации по Delphi указано, что данная функция предназначена только для Windows 95. Но на практике она работает и на более поздних версиях Windows при включенной поддержке режима энергосбережения в BIOS. Создадим два метода для включения и выключения монитора:

const
MONITOR_ON = -1;
MONITOR_OFF = 2;
. . .
procedure TfrmMain.actMo-nitorPowerOffExecute(Sender: TObject);
begin
SendMessage(frmMain.Han- dle, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_OFF);
end;
procedure TfrmMain.act MonitorPowerOnExecute(Sender: TObject);
begin
SendMessage(frmMain.Han-dle, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_ON);
end;

ВНИМАНИЕ! Хочется особо указать на возможность перегрузки элементов монитора при многократном быстром переключении режимов, что может привести к поломке электроники. Так что использовать вышеописанные функции следует осторожно.