$path = "c:\tmp\" # 出力先
$file = "Cap_{0:000}.png" # {0:000} 0番目の引数を3桁の0埋め数字とする。
Add-Type -A System.Windows.Forms # このセッションに型を追加。
[Windows.Forms.Screen]::PrimaryScreen.Bounds | # ディスプレイサイズを取得し、
% {[Drawing.Bitmap]::New($_.Width, $_.Height)} | # そのサイズのBitmapデータ生成。
sv b # Set-Variable 変数への代入。bにBitmapオブジェクトを代入。
[Drawing.Graphics]::FromImage($b).CopyFromScreen(0, 0, $b.Size) # 描画オブジェクトで画面キャプチャして、Bitmapデータへ反映。
md -f $path # フォルダ作成。-f:force 既に存在する場合エラーを抑止。
1..1000 | # 1～1000まで
% { $path + $file -f $_ } | # 繰り返し、フォーマット。c:\tmp\Cap_001.pngなどに変換。
? { (Test-Path $_) -eq $false } | # その内、ファイルが存在しないパスのみを取得。
select -F 1 | # 最初の1件のみにフィルタして、
% { $b.Save($_) } # そのパスにBitmapデータをファイル保存。
Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing
$filePath = "c:\tmp\Cap_{0:000}.png"
$fileKind = [System.Drawing.Imaging.ImageFormat]::Png
#$fileKind = [System.Drawing.Imaging.ImageFormat]::Jpeg
#$fileKind = [System.Drawing.Imaging.ImageFormat]::Gif
#$fileKind = [System.Drawing.Imaging.ImageFormat]::Bmp
# スクリーンキャプチャして、Graphicsオブジェクトを生成
$rect = [System.windows.forms.Screen]::PrimaryScreen.Bounds
$bitmap = New-Object System.Drawing.Bitmap($rect.Width, $rect.Height)
$graphics = [System.Drawing.Graphics]::FromImage($bitmap)
$zero = New-Object System.Drawing.Point(0, 0)
$graphics.CopyFromScreen($zero, $zero, $bitmap.Size)
# ファイル名を決定するために、存在しないファイルになるまでループ
$i = 0
do
{
$path = $filePath -F $i # 文字列フォーマット
$i++
} while (Test-Path $path);
# ファイル保存
$bitmap.Save($path, $fileKind)
#==================================================================
# ツールの概要
#==================================================================
# 一定間隔で指定フォルダの最新の画像ファイルを表示する。
# ウィンドウをクリックした場合も最新の画像ファイルを表示する。
# ウィンドウをダブルクリックするとウィンドウが画像にフィットする。
#==================================================================
# 事前準備
#==================================================================
# 管理者権限でpowershellを開き、実行ポリシーを変更しておく。
# Window 8の場合
# 1. キーボードでWindowsキー押下。
# 2. キーボードでpowershellと入力。
# 3. Shift-Ctrlを押しながら、powershellアイコンをクリック。
# 4. キーボードでSet-ExecutionPolicy RemoteSignedと入力。
#==================================================================
# 使用方法
#==================================================================
# このテキストをコピーしてファイルに保存。拡張子はps1とする。
# 下記の「設定値」欄を変更し、powershellからps1ファイルを実行。
# Windows8の場合はファイルを右クリックして「PowerShellで実行」を選択。
#==================================================================
# ライセンス
#==================================================================
# Copyright (c) 2015 Barracuda sh
# This software is released under the MIT License.
# http://opensource.org/licenses/mit-license.php
#==================================================================
# 設定値
#==================================================================
$pictDirPath = "C:\tmp"
$fileExt = @("*.gif", "*.jpg", "*.jpeg", "*.png", "*.bmp")
$interval = 2000
$width = 480
$height = 320
#$DebugPreference = "Continue"
#==================================================================
# メイン処理
#==================================================================
# コンソールを非表示
PowerShell -WindowStyle Hidden -Command Exit
# アセンブリ読み込み
Add-Type -Assembly System.Windows.Forms
Add-Type -Assembly System.Drawing
# Formサイズ（=画像サイズ）
$size = New-Object System.Drawing.Point
$size.X = $width
$size.Y = $height
# Form生成
[System.Windows.Forms.Form]$mainForm = New-Object System.Windows.Forms.Form
$mainForm.ClientSize = $size
# PictureBoxを生成しFormへ追加
[System.Windows.Forms.PictureBox]$pictBox = New-Object System.Windows.Forms.PictureBox
$pictBox.Sizemode = [System.Windows.Forms.PictureBoxSizeMode]::Zoom
$pictBox.AutoSize = $false
$pictBox.Size = $size
$pictBox.anchor = `
[System.Windows.Forms.AnchorStyles]::Top -bor `
[System.Windows.Forms.AnchorStyles]::Bottom -bor `
[System.Windows.Forms.AnchorStyles]::Left -bor `
[System.Windows.Forms.AnchorStyles]::Right
$mainForm.Controls.Add($pictBox)
#タイマーイベントコールバック関数
$tick = {
Write-Debug "[イベント]タイマー"
# 画像表示を行う
updatePict $script:mainForm $script:pictBox $script:pictDirPath $script:fileExt $false
}
# ピクチャーボックスクリックイベントコールバック関数
$click = {
Write-Debug "[イベント]クリック"
# 強制画像表示を行う
updatePict $script:mainForm $script:pictBox $script:pictDirPath $script:fileExt $true
}
# ピクチャーボックスクリックイベントコールバック関数
$doubleClick = {
Write-Debug "[イベント]ダブルクリック"
$widthRatio = $pictBox.Size.Width / $pictBox.Image.Size.Width
$heightRatio = $pictBox.Size.Height / $pictBox.Image.Size.Height
Write-Debug ("width ratio = " + $widthRatio)
Write-Debug ("height ratio = " + $heightRatio)
if ($widthRatio -le $heightRatio)
{
[int]$newWidth = $script:mainForm.ClientSize.Width
[int]$newHeight = $script:pictBox.Image.Height * $widthRatio + 1
}
else
{
[int]$newWidth = $script:pictBox.Image.Width * $heightRatio + 1
[int]$newHeight = $script:mainForm.ClientSize.Height
}
$script:mainForm.ClientSize = New-Object System.Drawing.Size($newWidth, $newHeight)
}
# 画像更新関数
function updatePict ([System.Windows.Forms.Form]$form, [System.Windows.Forms.PictureBox]$pictBoxObj, [string]$path, [array]$ext, [bool]$force) {
Write-Debug ("path = " + $path)
Write-Debug ("ext = " + $ext)
Write-Debug ("force = " + $force)
# ファイル一覧を取得
$path = $path + "\*.*"
$sortFileAry = (Get-ChildItem $path -include $ext | sort CreationTime -Desc)
# ファイル数が0なら終了
if ($sortFileAry.Length -eq 0)
{
$pictBoxObj.ImageLocation = ""
$form.Text = ""
return
}
# 最新のファイルのパスを取得
$latest = $sortFileAry[0].FullName
# CPU・HDD負荷低減のため、前回と同じファイルパスの場合は画像表示をスキップ。
if (!$force) {
if ($pictBoxObj.ImageLocation -eq $latest)
{
Write-Debug "更新無"
return
}
}
# 前回と違うファイルパスの場合は、画像ファイルを表示する。
$pictBoxObj.ImageLocation = $latest
$form.Text = $latest
Write-Debug $latest
}
# PictureBoxのクリックイベント登録
$pictBox.Add_Click($click)
$pictBox.Add_DoubleClick($doubleClick)
# タイマー生成
$timer = New-Object Windows.Forms.Timer
$timer.Interval = $interval
$timer.Add_Tick($tick)
$timer.Enabled = $true
# 初回画像表示
updatePict $script:mainForm $pictBox $pictDirPath $script:fileExt $true
# メインフォームを表示
$mainForm.ShowDialog()
# タイマーを終了。
$timer.Enabled = $false
 |
| Win7のログオフスクリプト |
 |
| Win10のログオフスクリプト |
