VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2005/01/14(Fri) 11:10
投稿者花ちゃん
Eメール
URL
タイトルRe^5: 画像のサイズを変更する方法

> > 先の回答でも書きましたが、ここのグラフィック関係をご覧下さい。
> > その中の ピクチャーボックスに表示・描画した画像・文字の保存 の中に
> > 下記のように書いていますが、.AutoRedraw = False になっていませんか?

又、グラフィック関係の中のピクチャーボックスで画像を拡大・縮小及びJPG形式で保存も
試して見ましたか?

> Picture1.PaintPicture(Picture1.Picture,0,0,Picture1.ScaseWidth,Picture1.ScaleHeight)

上記で拡大・縮小できましたか?
拡大・縮小して保存する最低限のコードを投稿するなり、ここのグラフィック関係を
よくご覧下さい。

一度下記を試して見て下さい。
Private Sub Command1_Click()
    Picture1.AutoRedraw = True
    Picture1.Picture = LoadPicture("c:\test.bmp")
    Picture1.PaintPicture Picture1.Picture, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight
    SavePicture Picture1.Image, "c:\MyBmp.bmp"
End Sub


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -