اشکال در ذخیره تصویر

سلام. روی یک تصویر تو picturebox تغییراتی دادم، وقتی میخوام این تصویر جدید رو save کنم، همون تصویر اولیه save میشه. اشکال کار کجاست ؟ با احترام و تشکر.

دوست من کدت رو بذار ببینم تا بتونم بهتر راهنمایی کنم به هر حال این کد ذخیره ی تصویر از یه PictureBox هست که تغییراتی هم توش دادی با Pset:

کد:

---

SavePicture Picture1.Image, Path & "filename.bmp"

---

کد:

---

Private Sub Command5_Click()
Picture1.AutoRedraw = True
Picture1.Picture = Picture1.Image
SavePicture Picture1.Image, "F:\TEST.BMP"
End Sub

---

در picturebox روی تصویر با همون PSet کار کردم. وقتی دکمه save رو کلیک می کنم (طبق کد بالا) ، تصویر تو picturebox همون تصویر اولیه میشه و در مسیر تعیین شده هم همین تصویر اورجینال save میشه. با احترام و تشکر

اولا Autoredraw رو قبل از Pset , line و ... فعال کن. از اینجا برش دار.

همچنین خط دوم هم اضافه است. این خط ها رو حذف کن:

کد:

---

Picture1.AutoRedraw = True
Picture1.Picture = Picture1.Image

---

با این دستور به راحتی Save می شه:

کد:

---

SavePicture Picture1.Image, "F:\TEST.BMP"

---

مرسی، درست شد.