Ceyhun TOPÇUOĞLU Kişisel Web Sitesi

Yazdıkça Genişleyen Textbox

Bugünlerde yazdığım bir programda girilen kelimenin uzunluğu kadar bir textbox’a ihtiyaç duydum bazı sitelerde ve msdn forumlarında bulduğum kaynaklar textbox’un font büyüklüğünü alarak bir katsayıyla çarpıp texti genişletiyordu. Fakat bu yöntemde boşluk ( space tuşu ) ve bazı özel karakterlerde tam boyutlandırma yapılmadığını gördüm. Hele ki birbirinin boyutlarını hiç tutmayan fontlarda hiçbir sonuç alamadım. Vb.net ve c# tabanlı dillerde genişlik basit bir şekilde inşa edilebiliyor ama VisualBasic 6 da böyle hazır bişey söz konusu değil. Konu VB6 olunca alternatif yöntemlere başvurmaktan başka çare bulamadım.Açıklamaları takip ederseniz mantığını kavrayacağınıza eminim Uzatmadan kaynak kodlara geçelim. Kullanılan Nesneler : 1 Adet Text(Text1) 1 Adet Picture(Picture1)

adownloadSourceyi İndirmek İçin Tıkla

Admin Hakkında
Kocaeli Üniversitesinde Mekatronik Mühendisliği hazırlık sınıfı öğrencisiyim. Nefes Doğa ve Kamp Grubu yöneticisi. #Camping #Vb.net #SolidWorks #PHP #SQL #ComputerSecurity... Ayrıntılı bilgi için tıklayın

  1. furkan diyor ki:

    bunu vb.net 2010 da nasıl yapabilirim?

    • Ceyhun TOPÇUOĞLU diyor ki:

      bunu yapmana gerek yok vb.net’de CreateGraphics kütüphanesinin MeasureString metoduyla çok basit bir şekilde yapılabiliyor örnek kod :
      Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
      Dim w As Integer = TextBox1.CreateGraphics().MeasureString(TextBox1.Text.Trim, TextBox1.Font, Me.Width).Width
      If w > 50 Then TextBox1.Width = w + 10
      ’50 textbox’ın baştaki genişliği
      ’10 sabit bir boşluk olması için imlecin yanıp sönmesi için gereken alan
      End Sub

Bir Yorum Yazın

Doğrulama Kodu : (Verilen işlemde boş bırakılan yeri doldurun) * Time limit is exhausted. Please reload CAPTCHA.