tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトルVB6のPaintPictureを.netではどのように変更しますか
記事No1905
投稿日: 2005/07/19(Tue) 15:39
投稿者ドットの知識
[OSのVer]:WindowsXP    [VBのVer]:VB.NET2003
 
VB6で作った画像ビューアを.netにアップグレードしようと思ったのですが
上手くいきませんでした
PictureBox メソッド picDest.PaintPicture はアップグレードされませんでした。
というメッセージがでました

PaintPictureはSystem.Drawing.Graphics.DrawImageに変わったという情報を
見つけて、手動で下記のようにしてみましたがエラーでした

  picDest(i).PaintPicture(picSource.Image, 0, 0, w, h)を
  picDest(i).System.Drawing.Graphics.DrawImage(picSource.Image, 0, 0, w, h)
  に変更しました

System.はSystem.Windows.Forms.PictureBoxのメンバではありません。
というエラーメッセージです

したいことは、picDest(i)にフォルダ内にある画像を次々に読み込ませたいのです。
どのように変更すればよいか教えていただけますか
よろしくお願いします
 

[ツリー表示へ]
タイトルRe: VB6のPaintPictureを.netではどのように変更しますか
記事No1906
投稿日: 2005/07/19(Tue) 16:03
投稿者花ちゃん
ここの下記当たりは、参考になりませんか?
hhttp://www.bcap.co.jp/hanafusa/dotnet/zuframe.htm

[ツリー表示へ]
タイトルRe^2: VB6のPaintPictureを.netではどのように変更しますか
記事No1908
投稿日: 2005/07/19(Tue) 16:45
投稿者ドットの知識
レスありがとうございました
サイト内のページはあらかじめ拝見させていただきました
もしやと思い
picDest(i).Image = System.Drawing.Graphics.DrawImage(picSource.Image, 0, 0, w, h)
などと書いてみたのですが、すみませんエラーでした
他の方法だと思うのですが思い当たらず書き込みをさせていただきました
すみません

[ツリー表示へ]
タイトルRe^3: VB6のPaintPictureを.netではどのように変更しますか
記事No1909
投稿日: 2005/07/19(Tue) 18:07
投稿者花ちゃん
グラフィック関係は.NET になって大きく変っていますので、前記のページを参考に
作り直して下さい。

★ 画像ファイルを読み込み表示したいなら下記のように
    Private Sub Button1_Click(ByVal sender As System.Object, _
                              ByVal e As System.EventArgs) Handles Button1.Click
        ''画像ファイルを読み込み表示(ファイルのサイズで)
        '表示する画像のサイズに合わせてPictureBoxを表示します
        PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize
        '画像ファイルを読み込みPictureBoxに表示
        PictureBox1.Image = System.Drawing.Image.FromFile("c:\test.bmp")
    End Sub

[ツリー表示へ]
タイトルRe^4: VB6のPaintPictureを.netではどのように変更しますか
記事No1912
投稿日: 2005/07/20(Wed) 12:45
投稿者ドットの知識
教えていただいたサンプルコードは動作しました
ありがとうございます
これを利用して
picSource.Image = System.Drawing.Image.FromFile(fname)
としたのですが
読み込んだ画像の描画が出来ないようで空のピクチャーボックスが並んでいます
何度も申し訳ございませんが対応を教えていただけますか

[ツリー表示へ]