tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Picture2.の鏡像が保存できない。
投稿日: 2008/08/23(Sat) 17:07
投稿者Do_Shirouto
いつも教えて頂き有難う御座います。
また教えて頂きたいのですが、
ここのサイトまたインターネット検索を参考にして、
下記のようなコードを実行した結果。
Fileは出来るのですが、画像がありません。
どこが悪いのかご指導のほど宜しくお願いいたします。
'----------------------------------------------------------
Private Sub Command1_Click()
CommonDialog1.ShowOpen
Set Picture1.Picture = LoadPicture(CommonDialog1.FileName)
End Sub
'----------------------------------------------------------
Private Sub Command2_Click()
Picture2.AutoRedraw = True
' 鏡像を得る
Picture2.PaintPicture Picture1.Picture, Picture1.ScaleWidth, 0, -Picture1.ScaleWidth, Picture1.ScaleHeight
'鏡像は表示されます。
End Sub
'----------------------------------------------------------
Private Sub Command3_Click()
CommonDialog2.ShowSave
SavePicture Picture2.Image, CommonDialog2.FileName
'Fileは出来るのですが、画像がありません。
End Sub
'----------------------------------------------------------

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

古いスレッドにレスはつけられません。