掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
デスクトップで座標色取得 (ID:4234)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Halbow です。 スクリーン座標 X,Y のピクセルの色は、ディスプレイＤＣから GetPixel で 取得できます。こんな感じです。 procedure TForm1.Button1Click(Sender: TObject); var DispDC: HDC; X,Y:integer; Clr:COLORREF; begin X := 100; Y := 100; DispDC := CreateDC('DISPLAY',nil,nil,nil); Clr := GetPixel(DispDC,X,Y); DeleteDC(DispDC); Panel1.Color := TColor(Clr); end; わたしのＨＰではディスプレイＤＣからのスクリーンキャプチャのプログラム を説明しています。（動画のキャプチャはできません） http://halbow.cool.ne.jp/Notes/N009.html
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.