Skip to main content

AccessTr.neT


Picturebox A Yazı Ekleme Ve Kaydetme

Picturebox A Yazı Ekleme Ve Kaydetme

Çözüldü #1
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

Visual Basic Code
 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:
Visual Basic Code
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
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
#2
Açıkçası ne yapmak istediğinizi tam olarak anlayamadım. Bilgileri resim olarak mı yazdırmak istiyorsunuz?
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla
#3
(03/07/2017 23:39)alpeki99 Adlı Kullanıcıdan Alıntı: 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.
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
#4
(03/07/2017 23:39)alpeki99 Adlı Kullanıcıdan Alıntı: Açıkçası ne yapmak istediğinizi tam olarak anlayamadım. Bilgileri resim olarak mı yazdırmak istiyorsunuz?

Örnek dosya ektedir.
.rar Kase.rar (Dosya Boyutu: 143,88 KB | İndirme Sayısı: 9)
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
#5
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)
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla
#6
(04/07/2017 12:29)alpeki99 Adlı Kullanıcıdan Alıntı: 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.
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da