picture boxの画像をimageに上下反転して表示したい

このQ&Aのポイント
  • ピクチャーボックスに描画した画像をイメージに上下反転して表示させる方法を教えてください。
  • イメージに上下反転した画像を表示させる方法を教えてください。
  • Windows2000、VB6.0で、ピクチャーボックスの画像をイメージに上下反転して表示させる方法を教えてください。
回答を見る
  • ベストアンサー

picture boxの画像をimageに上下反転して表示したい

お世話になります。mmc820です。 表題の通りですが、ピクチャーボックス(作業用で実際は表示されません)に描画した画像をイメージに上下反転した状態で表示させたいと思います。 ピクチャーボックスに上下反転して表示する方法は見つけたのですが、イメージに表示させる方法が見つからず困っております。 イメージへの反転表示は可能なのでしょうか? 皆様、良い方法がありましたらどうか御教示下さい。 もし不可能であれば「不可能です。」という旨のお答えでも結構ですので、ご意見お聞かせください。 当方の開発環境はWindows2000、VB6.0です。 また、説明に不足がありましたら補足いたします。 どうか宜しくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
回答No.1

いったんピクチャーボックスへ上下反転させてから image1.picture = picture1.image でPicture1の内容をimage1へというのではだめですか?

mmc820
質問者

お礼

あぁ!!それは盲点でした。早速試してみます。 結果を後ほど報告させていただきます。 回答ありがとうございました。

その他の回答 (1)

回答No.2

#1の補足です。 Picture1.AutoRedraw = True でないとだめでした。

mmc820
質問者

お礼

その後、無事に反転表示が出来るようになりました。有難うございます。 ・・・が、新たな問題が浮上してきました(-_-;) そちらの方でもお知恵をお借りできれば幸いです。 今後ともお世話になることがあるかと思いますが宜しくお願いします。

関連するQ&A

  • ピクチャボックスのサイズを状況に応じて変えたい。

    度々お世話になります。 今、ピクチャボックスに描画を行い、別のピクチャボックス上のイメージに表示しています。 描画を行う範囲はその都度異なり、それに対応するためにピクチャボックスは可能な限り大きくしてあります。ところが、イメージに表示させる段階で、描画していない部分まで表示するため、見た目が悪く、使い勝手も悪いのです。そこで、作図範囲のみを表示させたいと考えています。 やはり、ピクチャボックスのサイズをどうにかするのが先決かと思いまして質問させていただきました。できれば、作図範囲に合った大きさになるようにその都度変化させたいと思うのですが、そういった方法はありますか? あるいは、作図範囲のみをイメージに表示する方法があればそれでも結構です。 何か良い方法があれば、御教示いただけると幸いです。 開発環境はWindows2000、VB6.0です。 宜しくお願いします。

  • ピクチャーボックス内でのイメージの移動

    VBで小さなピクチャーボックスの中に大きなビットマップを表示させ、ピクチャーボックスの内部でそのビットマップを移動させたいのですが、ヒントを下さい。 丁度、望遠鏡の丸の中で、景色がスクロールするイメージです。

  • ピクチャボックスに描画した画像の保存

    VB6.0にて、 http://www.uploda.org/uporg898462.jpg このようなものを作成しました。 折れ線グラフはプログラムにて後から描画したもの、 それ以外の目盛りなどは最初からピクチャボックスに描画してあるものです。 pic1,pic2は共にピクチャボックスです。 赤い線で囲まれたpic1を目盛り、グラフ、その他のテキストボックスや文字と共に画像として保存したいのですが、 SavePicture Pic1.Image, "C:\SaveTest2.bmp" とすると、pic1の大きさの、何も描画されていない真っ白な画像が保存されてしまいます。 また、SavePicture Pic2.Image, "C:\SaveTest2.bmp" (pic2の保存) とすると、折れ線グラフのみが描画され、目盛りは無くなった画像が保存されてしまいます。 2つのピクチャ共にAutoRedraw=Trueを設定しています。 pic1を上手く保存する方法は無いでしょうか? ご教授、お願いします。

  • ピクチャーボックスの画像が欠けてしまいます。

    VB.NETとWinXPなのですが、 コマンドボタンを押して、ファイルダイアログボックスを開いて jpgファイルを指定するとピクチャーボックスにその 画像が表示されるようなものをつくっているのですが、 ピクチャーボックスの上に出るファイルダイアログボックスが重なっていた部分だけ画像が欠けてしまいます。 Picturebox1.Refresh()かなと思って試してみたのですが、今度は全部消えてしまいました。 良い方法があったら教えて頂きたいです。 よろしくお願いします。

  • VB2010にて、文字を上下鏡反転したいのですが、どなたか教えていただ

    VB2010にて、文字を上下鏡反転したいのですが、どなたか教えていただけないでしょうか。 マトリックスでピクチャーボックスの左下を原点としてグラフ描画できましたが、 文字が逆さまになってしまいました。 ピクチャーボックスに、グラフィクスオブジェクトを使い ビットマップイメージで描画して文字を上下反転しようと試みています。 以下のコードで、 Me.PictureBox1.Image.RotateFlip(RotateFlipType.RotateNoneFlipY) の部分がエラーとなってしまいます。 どう修正すればよいか教えていただけませんでしょうか。 どうぞよろしくお願いいたします。 Dim myPen As New Pen(Color.Red, 1) Dim myFont As New Font("MS UI Gothic", 20) Dim myMatrix As New Matrix 'Dim g As Graphics = Me.PictureBox1.CreateGraphics Dim Image2 As New Bitmap(Me.PictureBox1.Width, Me.PictureBox1.Height) Dim pg As Graphics = Graphics.FromImage(Image2) Dim px, py As Long px = Me.PictureBox1.Width py = Me.PictureBox1.Height myMatrix.Scale(1, -1) '拡大縮小(y軸のみ正負の方向を逆にする) myMatrix.Translate(0, -py) '平行移動(ピクチャーボックスの高さ分,下へ平行移動) 'g.Transform = myMatrix pg.Transform = myMatrix 'g.DrawLine(myPen, 0, 0, 200, 200) pg.DrawLine(myPen, 0, 0, 200, 200) 'g.DrawString("text", myFont, Brushes.Red, 100, 100) pg.DrawString("text", myFont, Brushes.Red, 100, 100) '"text"を上下反転する 'Me.PictureBox1.Image = Image.FromFile("C:\☆test.bmp") Me.PictureBox1.Image.RotateFlip(RotateFlipType.RotateNoneFlipY) Me.PictureBox1.Refresh()

  • ピクチャーボックスで四角形内を塗りたい。

    初歩的な質問でしたらすみません。 ピクチャーボックスに四角形を描画します。 その四角形の内側をクリックしたら、四角形の内側が 塗りつぶされるようにしたいと思っております。 黒で四角形を書き、青く塗りつぶす。というように ペイントの塗りつぶしのようなイメージです。 四角形の大きさが固定でしたら、何とかできたのですが、 寸法が変化するので微妙な大きさになると塗りつぶせない事が あるのでこまっています。 簡単に塗りつぶせる方法がありましたら教えてください。 形は四角形限定です。 どうぞよろしくお願いします。

  • C#ピクチャーボックス再描画について

    C#ピクチャーボックス再描画について 動的生成したピクチャーボックスに文字を描画します そのあと、そのピクチャーボックスをD&DでForm内を移動できるようにしています その際、あるピクチャーボックスが別のピクチャーボックスの上を通過したり 他のコントロールが上になったりすると、描画した文字が消えてしまいます。 再描画について調べるとRefleshやUpdateとかができました。 しかし、Refleshを使うと文字を描画する前の状態を再描画してしまいます。 再描画の方法はTimerで10ミリ秒毎ぐらいにしようと思ってます。 Refleshをピクチャーボックスに文字を描画させた後に再描画できるように設定できればいいんですが…。 他に方法があったりしたら教えてください!!

  • ピクチャボックスにマウス周辺画像を表示させたい

    VB2010にて、ピクチャボックスにマウス周辺画像を表示させたいのですが、 どなたかやり方を御存じないでしょうか? 教えてください。よろしくお願いいたします。

  • ピクチャボックス間のコピー方法

    たびたび質問しているhidezoです(^_^; 表題のように、ピクチャボックスにある画像を、別のピクチャボックスにコピーしたいのですが、うまくいきません。 おそらく簡単な解決策があると思うのですが、ヘルプを参照してもよく分かりませんでした。 プログラムの内容 オブジェクト Picture2,Picture3に同じ画像を代入 Piture2上にLineを描画 2回目以降のPiture2にLineを描画する際に一度Picture3を代入して元の画像に戻してからLineを描画 (ゲームでいうとキャラクタ移動でキャラクタと背景の重ね合わせみたいな感じです) やってみた方法 方法1(ダメでした) Picture2.Picture = Picture3.Picture 方法2(ダメでした) Picture2.PaintPicture Picture3.Picture, 0, 0 方法3(できたけど・・・) SET Picture2.Picture = TMP ※TMPは・・・ Set TMP = LoadPicture(strOpenFile) Set Picture3.Piture = TMP 方法3の場合、グローバル変数を使わなくちゃいけないので避けたいです。よろしくお願いします。

  • VB2005でピクチャーボックス内の図形を移動

    VB2005のフォームにピクチャーボックスを配置して、Imageで写真を張り付けたとき、写真がピクチャーボックスの大きさよりも大きい場合にピクチャーボックス内の写真を移動させる方法ってあるのですか?現在左上の一部分しか表示されません。同時に写真の拡大縮小ってできるのでしょうか?どなたか詳しい方よろしくお願いいたします。

専門家に質問してみよう