Приостановить компьютер (sleep) |
ОГЛАВЛЕНИЕ    HOME  MAIL |
У компьютеров ATX есть функция Sleep. Эта программа заставляет компьютер "заснуть".procedure TForm1.Button1Click(Sender: TObject); begin SetSystemPowerState(true, true); end; email: delphi4all@narod.ru |