VB.NET: Menggabungkan 2 Gambar dalam 1 File - Part 2


Artikel ini lanjutan dari Part 1 yah...

Tombol keempat digunakan untuk menyimpan gambar yang telah digabungkan kedalam 1 file menggunakan savefiledialog, dengan terlebih dahulu mengecek apakah gambar yang digabungkan sudah ada atau belum.
Private Sub Button4_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button4.Click

    If imgMerge Is Nothing Then MsgBox("Belum ada gambar.") : Exit Sub
    SaveFileDialog1.Filter = "*.png|*.png|*.gif|*.gif|*.jpg|*.jpg"
    If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
       imgMerge.Save(SaveFileDialog1.FileName)

       MsgBox("Gambar tersimpan ke file.")
    End If
End Sub


Okey kita hampir selesai nih. Untuk saving ke database kita taruh belakangan yah... kita coba dulu code yang udah kita buat. Run...run...
Kita pilih 2 buah gambar source, supaya hasilnya bagus usahakan gambar memiliki tinggi yang sama. Kemudian kita klik tombol Combine Images! untuk menggabungkan gambar kemudian menampilkan di picturebox ketiga.
Untuk menyimpan hasilnya klik tombol Save to File, dialog Save As akan muncul.
Pilih lokasi penyimpanan dan nama file gambar yang baru digabung. Kemudian kita dapat memeriksa hasilnya di lokasi tempat gambar disimpan tersebut.
Dan ini dia hasilnya....
Okay, Rani masih utang buat bikin saving image hasil ke database yah. Insya Allah Senin yaaah....

UPDATE!!! Part 3 nya udah beres

Click here if you like this article.


Post a Comment

0 Comments