小さいImageをコントロール配列で10個置き,そこにFileListBoxで指定した画像をサムネイルのように表示し,そこから指定した1枚の画像を大きいImageに表示させる,画像ビューワを作成しています。
サムネイルのように表示される画像の一つをクリック(選択)すると,その
画像が反転表示される(色で囲まれる)ようにしたいのですが,方法が
わかりません。現在は以下のように,選んだImageのBorderStyleを1に
なるようにしております。
Dim i As Integer
Static old As Integer
i = Index
imgPict(old).BorderStyle = 0
imgPict(i).BorderStyle = 1
old = i
ご教授よろしくお願いします。
色の反転方法にも色々ありますけど、
APIのBitBlt関数でXORを利用すればできたと思います。
ツイート | ![]() |