HSPTV!掲示板

プリントスクリーン時にマウスカーソルも取得(表示)する方法はありませんか？

>CGSGetGlobalCursorData()
こんな関数も見つけましたが、使い方が分からず・・・
と、言うかMac用？の様な気も。
（とあるサイトのリンク先にMac用と思われるリファレンスがあったので）


こんなサイトも見つけましたが・・・
http://xcatsan.blogspot.com/2008/08/1.html

Cocoaで調べたら分かるとおもいますが、お察しのとおりそれらはMac向けの情報です。

もし、「ある点を指し示している様子を撮影したい」というだけであれば、スクリーンショットを取得すると同時にそのときのマウスカーソル位置を取得して、スクリーンショットにマウスカーソルを書き込んでしまうスクリプトを書くほうが手っ取り早いかもしれません。
マウスカーソルの形状も再現したいとなるとそれを取得する方法が必要になって面倒ですが、そうでないなら適当なカーソル画像を合成しちゃえばいいですね。

昔書いたスクリプトです。

#include "user32.as"
#include "gdi32.as"
#define SRCCOPY     0x00CC0020

	screen 0,ginfo_dispx,ginfo_dispy,2

	// スクリーンショット
	CreateDCA "DISPLAY",0,0,0:hdcScreen=stat
	BitBlt hdc,0,0,ginfo_dispx,ginfo_dispy,hdcScreen,0,0,SRCCOPY
	DeleteDC hdcScreen

	// マウスアイコンハンドルを取得
	dim CURSORINFO,5
	CURSORINFO.0=20
	GetCursorInfo varptr(CURSORINFO)
	
	// アイコンを描画
	DrawIconEx hdc,CURSORINFO.3,CURSORINFO.4,CURSORINFO.2,0,0,0,0,0x0003 
	redraw 1

	gsel 0,1

>SYAMさん
返信ありがとうございます。
やっぱりMac用ですか。
>適当なカーソル画像を合成しちゃえば
オフセットを取得できなければこの方法で行こうかと、ほかのアイコンだとずれる可能性あるので。

>inoviaさん
おおっ、これはすごい・・・
と、思ったら矢印以外の、ホットスポットが左上以外のマウスアイコンでは、表示位置がずれますね。
テキストエディタ上のカーソルでは mouseX+15 mouseY+16 この位ずれてます。


このホットスポット位置（オフセット）を取得できませんか？

改。

#include "user32.as"
#include "gdi32.as"
#define SRCCOPY     0x00CC0020

	screen 0,ginfo_dispx,ginfo_dispy,2

	// スクリーンショット
	CreateDCA "DISPLAY",0,0,0:hdcScreen=stat
	BitBlt hdc,0,0,ginfo_dispx,ginfo_dispy,hdcScreen,0,0,SRCCOPY
	DeleteDC hdcScreen

	// マウスアイコンハンドルを取得
	dim CURSORINFO,5
	CURSORINFO.0=20
	GetCursorInfo varptr(CURSORINFO)

	// ホットスポットを取得
	dim ICONINFO,5
	GetIconInfo CURSORINFO.2,varptr(ICONINFO)
	
	// アイコンを描画
	DrawIconEx hdc,CURSORINFO.3-ICONINFO.1,CURSORINFO.4-ICONINFO.2,CURSORINFO.2,0,0,0,0,0x0003 
	redraw 1

	gsel 0,1

>inoviaさん
おおっ、これはすごい・・・
ピッタリです、ありがとうございました。
解決。