■ 現在のこのページの役立ち度:
表示されない場合こちらのリンクからもご覧になれます。
■ このページの役立ち度を評価する:
役立ち度を評価してください。
(1(左):あまり役立たない - 5(右):大変役立った):
■ ページの共有:
[ サイト内検索 ]
カスタム検索
#2330-1バケツツールを作りたいのですがケンタロウ1999-07-29(木) 22:56
     #2360-1RE#2330:バケツツールを作りたいのですがHONEY1999-07-30(金) 13:58
#2330-1
バケツツールを作りたいのですが
フォトショップなどにある
バケツツール(同じ色の範囲を塗るツール)
を作りたいのですが、
方法が分からないのはもちろんですが、
考え方すら分かりません。

という質問を他の掲示板でしたところ、
以下ののようなアドバイスを頂きました。

>  閉領域の塗りつぶしをしたいということでしょうか。
>  これは、API関数1つでOKなのですが、この掲示板では話題にできません
> ので、Q&A掲示板の方にどうぞ。
> APIを使わないで行う方法もありますが、非常に時間がかかります。
> ロジックとしては、塗りつぶしの開始点から左右に同色のピクセルがあるかど
>うかを境界までループで調べ、色を変更し、次の行に移り、、というような感じ
>ですね。

ということで、
この哀れな子羊に良きアドバイスをお願いします。
#2360-1
RE#2330:バケツツールを作りたいのですが
'API関数の宣言
Declare Function ExtFloodFill Lib "gdi32" _
(ByVal hdc As Long, ByVal x As Long, ByVal y As Long, _
ByVal crColor As Long, ByVal wFillType As Long) As Long

 hdc       デバイスコンテキストのハンドル。
           PictureBoxのhDCなど
 x,y       塗りつぶし開始点の座標(Pixel)
 crColor   境界線色、または塗りつぶされる対象の色(Long型)
 wFillType FLLODFILLBORDER crColor色の境界線に囲まれた内部
      を塗りつぶす
           FLOODFILLSURFACE crColor色の部分を塗りつぶす
            (質問のケースは、多分こちらの方でしょう)

 wFillTypeがFLOODFILLBORDERの場合は、Point(x,y) <> crColorで
なくてはなりません。
 wFillTypeがFLOODFILLSURFACEの場合は、Point(x,y) = crColorで
なくてはなりません。
 FLOODFILLBORDER,FLOODFILLSURFACEの値はAPIビュアーで調べてくだ
さい。
 塗りつぶす方の色は、FillColorプロパティで指定します。また、
FillStyleプロパティは「塗りつぶし」にしておきます。
 PictureBoxのAutoRedrawはTrueにし、最後にRefreshしましょう。
このページと関連する記事:
#386-0バケツツールが作りたいのですが1999-07-29(木) 17:48
#18643-0ペイントのように色のぬりつぶし2000-03-28(火) 00:35
#1978-0RE#1961:多角形の塗りつぶし1999-07-24(土) 20:26
#1949-0RE#1945:作図した図形を塗りつぶしたいのですが...1999-09-29(水) 19:20
#16722-0ペイントツール…2001-06-27(水) 21:56
#11176-0flood fill で色を塗る時1999-12-08(水) 11:06
#1-1はじめて使わせていただきます。2002-02-08(金) 13:06
#8548-0カラーパレットの取得1999-10-29(金) 19:07
#46601-0塗りつぶし領域の印刷が出来ない2001-09-06(木) 14:44
#9441-0FloodFillとExtFloodFillについて。1999-11-11(木) 20:40
お探しの情報は見つかりましたか?お困りの問題は解決しましたか?
サイト内検索, 似た記事検索で見つからなくてもあきらめずに掲示板で質問してみましょう。
VB初心者友の会があなたのお役に立てれば幸いです。また、本ページの投稿者の方々にこの場を借りて感謝致します。
本ページは過去ログを集めて自動構成しています。よろしければこのページに関するフィードバックをお願いします。
(※ 構成の誤り、広告等の不適切な記事、リンク切れ、読めないページの報告など)