tech.guitarrapc.cóm

Technical updates

PowerShell で スクリーンショットを取るときの注意

TLでこのような記事を見ました。 スクリーンショットを撮りたいようです。

もと記事はこれ

その後、できるようになったとのこと。

見てみましょう。

目次

追記

2022/2/15 どうせ使うなら、今ならこれがよさそうですね。

stackoverflow.com

参照がたりない

のコードだとPowerShell Host で実行すると 参照ないとかいろいろ言われます。

Unable to find type [System.Windows.Forms.Screen]. Make sure that the assembly that contains this type is loaded.
At C:\Users\acquire\Desktop\Screenshot.ps1:2 char:1
+ $b = New-Object System.Drawing.Bitmap([System.Windows.Forms.Screen]::PrimaryScre ...
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (System.Windows.Forms.Screen:TypeName) [], RuntimeException
    + FullyQualifiedErrorId : TypeNotFound

Unable to find type [System.Drawing.Graphics]. Make sure that the assembly that contains this type is loaded.
At C:\Users\acquire\Desktop\Screenshot.ps1:3 char:1
+ $g = [System.Drawing.Graphics]::FromImage($b)
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (System.Drawing.Graphics:TypeName) [], RuntimeException
    + FullyQualifiedErrorId : TypeNotFound

New-Object : Cannot find type [System.Drawing.Point]: verify that the assembly containing this type is loaded.
At C:\Users\acquire\Desktop\Screenshot.ps1:4 char:20
+ $g.CopyFromScreen((New-Object System.Drawing.Point(0,0)),(New-Object System.Draw ...
+                    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidType: (:) [New-Object], PSArgumentException
    + FullyQualifiedErrorId : TypeNotFound,Microsoft.PowerShell.Commands.NewObjectCommand

You cannot call a method on a null-valued expression.
At C:\Users\acquire\Desktop\Screenshot.ps1:5 char:1
+ $g.Dispose()
+ ~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) [], RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull

You cannot call a method on a null-valued expression.
At C:\Users\acquire\Desktop\Screenshot.ps1:6 char:1
+ $b.Save((Join-Path .\Desktop $outImage))
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) [], RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull

これは、 PowerShell ISE では、デフォルトで System.Windows.Forms が参照されるけど PowerShell ホストでは参照されないため。嫌ですよね、こういうの。 で、参照を Add-Type で追加して、出力パスを ハードコードから 環境変数からデスクトップを見るようにします。 *1

[string]$outImage =”screen.png”
Add-Type -AssemblyName System.Windows.Forms
$b = New-Object System.Drawing.Bitmap([System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Width,[System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Height)
$g = [System.Drawing.Graphics]::FromImage($b)
$g.CopyFromScreen((New-Object System.Drawing.PointƐ,0)),(New-Object System.Drawing.PointƐ,0)),$b.Size)
$g.Dispose()
$b.Save((Join-Path $env:UserProfile\Desktop $outImage))

あとは、 PowerShell ホストから読んでみます。

powershell -File .\Screenshot.ps1

とれましたね。

f:id:guitarrapc_tech:20140330182528p:plain

面倒なのは参照回りですが、うまく なってほしいですね。

追記

少しは使いやすいように ファンクションにしました。 よろしければどうぞ。

コード全文です。

できること
  1. デフォルトの出力先ディレクトリの存在確認とない場合の生成
  2. 生成されるスクリーンショット名の簡単な指定
  3. 連写
  4. 連写間隔の指定
サンプル
  • ただとるだけならこれで
Get-ScreenShot
  • 10枚連写します。間隔はデフォルト 1000ms = 1sec です
10 | Get-ScreenShot

こっちでもいいですよ。

Get-ScreenShot -RepeatTimes 10
  • 100枚を 間隔 10ms でとります
100 | Get-ScreenShot -DurationMs 10

やりすぎにはご注意ください。

f:id:guitarrapc_tech:20140330185450p:plain

*1:出力パスが存在しないと、 A generic error occurred in GDI+ のエラーで起こられます