AccessTr.neT

3 Adet textbox ve 1 adet Picturebox ım var

Textboxlardaki verileri alt alt ve formatları ile birlikte (Font boyutu rengi vs..vs..) pictureboxa aktarıp sonrada jpg veya bmp şeklinde kaydetmek istiyorum.

Amacım firma isim ve adreslerinden KAŞE oluşturmak
Textbox1.Text= Ali Veli Hasan
Textbox2.Text= 123 Sokak No :25 İzmir
Textbox3.Text= Hasan Tahsin Vd / 1234567890

Picturebox Sonucu Şu Olmalı:
Ali Veli Hasan
123 Sokak No :25 İzmir
Hasan Tahsin Vd / 1234567890

EKLE

 Dim grafik As Graphics = PictureBox1.CreateGraphics

        Dim style As FontStyle = FontStyle.Bold

        Dim fonts As Font = New Font(New FontFamily("Arial"), 14, style)



        grafik.DrawString(DRichTextBox1.Text, DRichTextBox1.Font, Brushes.Red, 30, 10)



        grafik.DrawString(TextBox1.Text, fonts, Brushes.Red, 10, 10)

        grafik.DrawString(TextBox2.Text, fonts, Brushes.Red, 10, 30)

KAYDET:

Dim dlg As New SaveFileDialog

        dlg.Filter = "Bitmap|*.jpg"

        If dlg.ShowDialog = Windows.Forms.DialogResult.OK Then

            PictureBox1.Image.Save(dlg.FileName)

        End If

Ekleme yapıyorum fakat kayıtta hata veriyor.
Teşekkürler

Açıkçası ne yapmak istediğinizi tam olarak anlayamadım. Bilgileri resim olarak mı yazdırmak istiyorsunuz?

(03/07/2017, 23:39)alpeki99 yazdı: [ -> ]Açıkçası ne yapmak istediğinizi tam olarak anlayamadım. Bilgileri resim olarak mı yazdırmak istiyorsunuz?

textbox1 = firmanın adı ve soyadı
textbox2 = firmanın adresi

bunları textboxlardaki formatları ile (ortalanmış, koyu, sağa yatık vs.vs..vs) pictureboxa aktarmak ve bunu jpg veya bmp şeklinde boyutlandırarak (20 ye 50, 40 a 60 şeklinde) backround olmadan kaydetme istiyorum.

Amacım: Richtexboxda dilekçe yazar iken "kaşe getir" deyip kayıtlı olan bilgileri dilekçenin altına resim olarak eklemek.

(03/07/2017, 23:39)alpeki99 yazdı: [ -> ]Açıkçası ne yapmak istediğinizi tam olarak anlayamadım. Bilgileri resim olarak mı yazdırmak istiyorsunuz?

Örnek dosya ektedir.

Resim kaydetme işleminizi Jpg olarak değil Png olarak kaydedin. Jpg zaten transparan zemin vermez ancak Png ile zemin rengi olmadan kaydedebilirsiniz.




Yukarıdaki ilk satır sizin ikinci benim düzenlediğim. Ayrıca resim kaydettiğiniz satırlar şu şekilde olsun:

(04/07/2017, 12:29)alpeki99 yazdı: [ -> ]Resim kaydetme işleminizi Jpg olarak değil Png olarak kaydedin. Jpg zaten transparan zemin vermez ancak Png ile zemin rengi olmadan kaydedebilirsiniz.

Kod:

' saveFileDialog1.Filter = "jpegs|*.jpg|gifs|*.gif|Bitmaps|*.bmp"
saveFileDialog1.Filter = "PNG resim türü|*.png"

Yukarıdaki ilk satır sizin ikinci benim düzenlediğim. Ayrıca resim kaydettiğiniz satırlar şu şekilde olsun:

Kod:

'MyPicture.Save(saveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Jpeg)
MyPicture.Save(saveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Png)

Teşekkürler.