久しぶりに来て偶々開いたスレッドで、
投稿したコードが引用されていたので喜んでみる♪
# でしゃばりすみません>konisiさん
前置きはさておき。
引用:
ちなみに描画するデバイスコンテキストのハンドルはhDCでそのhDCのもとのウィンドウ
ハンドルはCambusWndです。
その場合は、以下のようにすると保存できるはずです。
※クラスWsEasyBmpの
定義を適当なファイルに保存し、プロジェクトに参加させておいてください。
コード:
Dim objBMP As WsEasyBmp
objBMP.SetCpuSleepLevel(-1)
'↑諸事情により、これを設定しないと一時的にCPU利用率が100%になる仕様です。
' 最初にこれを指定すると、回避できます。
objBMP.SetTargetWindow( CambusWnd )
objBMP.GetBmp( 0, 0, 240, 320 )
'↑ウインドウからの画像取り込みサイズ240x320は適切に変更してください。
objBMP.Bsave( "保存ファイル名.bmp" )
手前味噌ですが、よろしければこちらも参照ください。
BMPの他にJpegやGifも読み込める、WsEasyBmpクラスの
上位互換クラスWsEasyPicsをサンプル付きで公開しています。
↓
サンプル&ヘルプ付きAB4開発支援ライブラリ
ダウンロード先