掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
大きな画像からRGB値を抽出するには？ (ID:140883)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Win32API GetPixel関数の方でまずは試してみました。 Private Declare Function GetPixel Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long Private Sub mopen_Click() Set File1 = CreateObject("mscomdlg.commondialog") File1.Filter = "画像(*.bmp)|*.bmp" File1.ShowOpen Picture1.Picture = LoadPicture(File1.FileName) test = Picture1.hdc End Sub Private Sub Command1_Click() A = GetPixel(test, 1000, 1000) Text1.SelText = A End Sub としましたが動作しませんでした。 A = GetPixel(test, 100, 100) とすると動作してくれるのですが・・・。 何か定義が間違っているのでしょうか？
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.