名前
題名
▼ Mr.XRAYさん > ▼ SOさん > > > 電源プランで「モニタの電源を切る」をOFFにすればOK? > > 御意 !! > んでもってサンプルコードです． > 動作確認は Windows 7 U64(SP1) + Delphi XE5(UP2) Pro VCL-32 です． > > //============================================================================= > // モニタ(ディスプレイ)の電源を切らない設定 > // タイムアウト時間を 0 にすれば無効となる > // 電源オプションの設定ダイアログでは表示が [なし] になる > // > // uses にShellAPI が必要 > //============================================================================= > procedure TForm1.Button3Click(Sender: TObject); > var > LCmdExe : string; > LOption : string; > begin > LCmdExe := 'powercfg.exe'; > LOption := '/CHANGE monitor-timeout-ac 0'; > ShellExecute(Handle, '', PChar(LCmdExe), PChar(LOption), nil, SW_HIDE); > end;
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link