{"id":235,"date":"2009-12-07T19:43:00","date_gmt":"1970-01-01T00:00:00","guid":{"rendered":"http:\/\/www.yazilimmutfagi.com\/?p=235"},"modified":"2009-12-07T19:43:00","modified_gmt":"1970-01-01T00:00:00","slug":"visual-basic-net-grafik-kutuphanesi","status":"publish","type":"post","link":"https:\/\/www.yazilimmutfagi.com\/index.php\/2009\/12\/07\/visual-basic-net-grafik-kutuphanesi\/","title":{"rendered":"Visual Basic.NET Grafik K\u00fct\u00fcphanesi"},"content":{"rendered":"

 <\/p>\n

Visual Basic.NET’in grafik kütüphanesini kullanarak bazi sekillerin nasil çizildigini anlatmaya çalisacagim.<\/font><\/div>\n
Düz çizgi<\/b> ile baslayalim: Ilk yapmamiz gereken formumuza, toolbox<\/i>‘tan bir PictureBox<\/b><\/i>ekliyoruz. Bir de <\/span>button <\/i>ekleyip adini btnCizgi seklinde degistiriyoruz.<\/span><\/font><\/div>\n
Gerçek hayatta bize çizgi çizmemiz için lazim olan nedir? Bir kalem ve bir kagit, oyle degil mi?<\/font><\/div>\n
Visual Basic.NET’te de bunlar lazim. Öyleyse hemen bir kalem ve bir de kagit tanimliyoruz:<\/font><\/div>\n

\n.<\/a><\/div>\n
Dim<\/span><\/font> kagit <\/span><\/font>As<\/span><\/font> Graphics<\/span><\/font><\/font><\/div>\n
Dim<\/font> kalem <\/font>As<\/font> Pen<\/font><\/font><\/div>\n

\n <\/div>\n
Simdi sira <\/span>kagit<\/i> ve <\/span>kalem<\/i> degiskenlerine deger atamaya geldi. <\/span>Graphics <\/b><\/i>olarak tanimladigimiz <\/span>kagit<\/i> degiskenine daha once formumuza ekledigimiz <\/span>PictureBox<\/b><\/i>‘u atiyoruz ve <\/span>CreateGraphics<\/b><\/i>metodunu cagiriyoruz ki çizim yapabilelim:<\/span><\/span><\/font><\/div>\n

\n <\/div>\n
kagit = PictureBox1.CreateGraphics()<\/font><\/div>\n

\n <\/div>\n
Simdi sira <\/span>kalem <\/i>degiskenimize deger atamaya geldi:<\/span><\/font><\/div>\n

\n <\/div>\n
kalem = <\/span>New<\/span><\/font> Pen(Color.Red)<\/span><\/font><\/font><\/div>\n

\n <\/div>\n
Yeni bir <\/span>Pen <\/b><\/i>nesnesi olusturuyor ve renk olarak da kirmiziyi seçiyoruz.<\/span><\/span><\/font><\/div>\n

\n <\/div>\n
Artik bir kalem ve bir de kagidimiz olduguna göre çizim yapabiliriz.<\/font><\/div>\n
Visual Basic.NET’te düz çizgi metotlari dört adettir. Hepsini anlatmayacagim; bizim burada kullanacagimiz metot bes adet parametre gerektirir:<\/span><\/span> kalem, yatay baslangiç noktasi, dikey baslangiç noktasi, yatay bitis noktasi ve dikey bitis noktasi.<\/span><\/u><\/span><\/font><\/div>\n

\n <\/div>\n
Analitik ortami; X ve Y dogrularini gözümüzde canlandiralim.<\/font><\/div>\n

\n <\/div>\n
\"\"<\/div>\n

\n <\/div>\n
kagit.DrawLine(kalem, 10, 20, 100, 110)<\/font><\/div>\n

\n <\/div>\n
Olayin türkçesi söyle: Kagidimizi aliyoruz, yapacagimiz fiili belirliyoruz (<\/span><\/span>DrawLine<\/b><\/i> – çizgi çek<\/span>), kalemimizle belirlenen noktalar (<\/span><\/span>X1,Y1,X2,Y2<\/span>) arasina çizgimizi çekiyoruz.<\/span><\/span><\/i><\/i><\/font><\/div>\n
Bu kadar basit.<\/font><\/div>\n

\n <\/div>\n
Simdi bir de <\/span><\/span>dörtgen<\/b><\/span> çizimine bakalim.<\/span><\/span><\/font><\/div>\n

\n <\/div>\n
Dim<\/span><\/span><\/font> kagit <\/span><\/span><\/font>As<\/span><\/span><\/font> Graphics = PictureBox1.CreateGraphics()<\/span><\/span><\/font><\/font><\/div>\n
Dim<\/font> kalem <\/font>As<\/font> Pen = <\/font>New<\/font> Pen(Color.Red)<\/font><\/font><\/div>\n
kagit.DrawRectangle(kalem, 10, 20, 100, 100)<\/font><\/font><\/div>\n

\n <\/div>\n
Prensip ayni, baslangiç ve bitis noktalarini belirliyor ve kalemimizle çizimimizi yapiyoruz.<\/font><\/div>\n

\n <\/div>\n
Bir de <\/span><\/span>daire<\/b><\/span> (<\/span><\/span>ellipse<\/span>) çizelim:<\/span><\/span><\/i><\/font><\/div>\n

\n <\/div>\n
Dim<\/span><\/span><\/font> kagit <\/span><\/span><\/font>As<\/span><\/span><\/font> Graphics = PictureBox1.CreateGraphics()<\/span><\/span><\/font><\/font><\/div>\n
Dim<\/font> kalem <\/font>As<\/font> Pen = <\/font>New<\/font> Pen(Color.DarkBlue)<\/font><\/font><\/div>\n
kagit.DrawEllipse(kalem, 150, 20, 100, 100)<\/font><\/font><\/div>\n

\n <\/div>\n
Bunu biraz açiklamak istiyorum. Visual Basic.NET daireyi baslica iki yöntemle çizer:<\/font><\/div>\n
1-) Önce bir dörtgen taslagi içine uygun daireyi çizer;<\/font><\/div>\n
 <\/div>\n
\"\"<\/font><\/div>\n

\n <\/div>\n
2-) Daireyi baslangiç noktasi (<\/span><\/span>X1,Y1<\/span>), genislik ve yükseklige göre çizer.<\/span><\/span><\/i><\/font><\/div>\n

\n <\/div>\n
Sonuçta ikisi de ayni kapiya çikar.<\/font><\/div>\n

\n <\/div>\n
Simdi daha kapsamli bir uygulamayla ögrendiklerimizi pekistirelim istiyorum.<\/font><\/div>\n
Bir forum açalim ve bir <\/span>PictureBox <\/i>ile üç adet buton eklelim. <\/span><\/font><\/div>\n

\n  .<\/a><\/div>\n
\"\"
\n <\/div>\n

\n <\/div>\n
Sonra da su kodlari ekleyelim:<\/font><\/div>\n

\n <\/div>\n
Public<\/font>Class<\/font> Form1<\/font><\/font><\/div>\n
Dim<\/font> x1 <\/font>As<\/font>Integer<\/font> = 100<\/font><\/font><\/div>\n
Dim<\/font> y1 <\/font>As<\/font>Integer<\/font> = 100<\/font><\/font><\/div>\n
Dim<\/font> x2 <\/font>As<\/font>Integer<\/font> = 50<\/font><\/font><\/div>\n
Dim<\/font> y2 <\/font>As<\/font>Integer<\/font> = 50<\/font><\/font><\/div>\n

\n <\/div>\n
Private<\/font>Sub<\/font> BalonCiz(<\/font>ByVal<\/font> tual <\/font>As<\/font> Graphics, _<\/font><\/font><\/div>\n
ByVal<\/font> KursunKalem <\/font>As<\/font> Pen, _<\/font><\/font><\/div>\n
ByVal<\/font> BaslangicNoktasi1 <\/font>As<\/font>Integer<\/font>, _<\/font><\/font><\/div>\n
ByVal<\/font> BaslangicNoktasi2 <\/font>As<\/font>Integer<\/font>, _<\/font><\/font><\/div>\n
ByVal<\/font> Genislik <\/font>As<\/font>Integer<\/font>, _<\/font><\/font><\/div>\n
ByVal<\/font> Yukseklik <\/font>As<\/font>Integer<\/font>)<\/font><\/font><\/div>\n

\n <\/div>\n
tual.DrawEllipse(KursunKalem, BaslangicNoktasi1, BaslangicNoktasi2, Genislik, Yukseklik)<\/font><\/font><\/div>\n
End<\/font>Sub<\/font><\/font><\/div>\n

\n <\/div>\n
Private<\/font>Sub<\/font> Form1_Load(<\/font>ByVal<\/font> sender <\/font>As<\/font> System.Object, <\/font>ByVal<\/font> e <\/font>As<\/font> System.EventArgs) <\/font>Handles<\/font>MyBase<\/font>.Load<\/font><\/font><\/div>\n
BalonCiz(PictureBox1.CreateGraphics, Pens.Black, x1, y1, x2, y2)<\/font><\/font><\/div>\n
End<\/font>Sub<\/font><\/font><\/div>\n

\n <\/div>\n
Private<\/font>Sub<\/font> btnBuyut_Click(<\/font>ByVal<\/font> sender <\/font>As<\/font> System.Object, <\/font>ByVal<\/font> e <\/font>As<\/font> System.EventArgs) <\/font>Handles<\/font> btnBuyut.Click<\/font><\/font><\/div>\n
PictureBox1.Refresh()<\/font><\/font><\/div>\n
x2 += 5<\/font><\/font><\/div>\n
y2 += 5<\/font><\/font><\/div>\n
BalonCiz(PictureBox1.CreateGraphics, Pens.Black, x1, y1, x2, y2)<\/font><\/font><\/div>\n
End<\/font>Sub<\/font><\/font><\/div>\n

\n <\/div>\n
Private<\/font>Sub<\/font> btnKucut_Click(<\/font>ByVal<\/font> sender <\/font>As<\/font> System.Object, <\/font>ByVal<\/font> e <\/font>As<\/font> System.EventArgs) <\/font>Handles<\/font> btnKucut.Click<\/font><\/font><\/div>\n
PictureBox1.Refresh()<\/font><\/font><\/div>\n
x2 -= 5<\/font><\/font><\/div>\n
y2 -= 5<\/font><\/font><\/div>\n
BalonCiz(PictureBox1.CreateGraphics, Pens.Black, x1, y1, x2, y2)<\/font><\/font><\/div>\n
End<\/font>Sub<\/font><\/font><\/div>\n

\n <\/div>\n
Yukaridaki örneklerden farkli olarak burada kagit<\/i> ve kalem<\/i> kullanmadim, kagit<\/i> yerine dogrudan PicrureBox<\/b>, kalem<\/i> olusturmak yerine de hazir Pen<\/b> nesnelerinden birini kullandim.<\/font><\/div>\n
Ayrica yine bir ‘balon çizme’ metodu yazdim ki hazir metodu istedigim an çagirip kullanabileyim. <\/font><\/div>\n
Metoduma 6 adet parametre ekledim. (Visual Basic.NET’te metotlar konusuna baska bu makalede<\/a> degindim, o yuzden ayrintiya girmiyorum.)<\/font><\/div>\n

\n <\/div>\n
Refresh() <\/b>metodu, adinda da anlasilacagi üzere, çizim alanimizi, yani kagidigimizi degisikliklere karsi yineliyor ki, yeni olusan sekli görebilelim.<\/span><\/font><\/div>\n
Bu konunun sonunda bir de ‘içi boyali’ sekillere deginmek istiyorum. Örnegin bir kare çizelim:<\/font><\/div>\n

\n <\/div>\n
PictureBox1.CreateGraphics.FillRectangle(Brushes.Black, 10, 10, 100, 100)<\/font><\/div>\n

\n <\/div>\n
Aradaki fark, <\/span>Draw<\/b>… (çiz) metodu yerine <\/span>Fill<\/b> (doldur) metodunu; <\/span>pen<\/b> (kalem) yerine ise <\/span>Brushes<\/b> (firça) kullanmis olmamizdir.<\/span><\/font><\/div>\n

\n <\/div>\n
Visual Basic.NET grafik kütüphanesi çok zengin metotlar ve nesnelerle doludur. Bunlari deneyerek ögrenebiliriz. Dilim döndügünce bir kaçini anlatmaya ve temel bilgileri vermeye çalistim.<\/font><\/div>\n

\n <\/div>\n
Bir baska makalede yine görüsürüz insallah.<\/font><\/div>\n

\n <\/div>\n

\n <\/div>\n

\n <\/div>\n

\n <\/div>\n

\n <\/div>\n

\n <\/div>","protected":false},"excerpt":{"rendered":"

Bu makalede vb.NET'in grafik kütüphanesine göz atacagiz. Visual basic.net ile kare, daire, çizgi… nasil çizilir onu görecegiz. <\/p>\n","protected":false},"author":519,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[418],"tags":[4939,4203,4577,5985,5314,5570,5831],"_links":{"self":[{"href":"https:\/\/www.yazilimmutfagi.com\/index.php\/wp-json\/wp\/v2\/posts\/235"}],"collection":[{"href":"https:\/\/www.yazilimmutfagi.com\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.yazilimmutfagi.com\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.yazilimmutfagi.com\/index.php\/wp-json\/wp\/v2\/users\/519"}],"replies":[{"embeddable":true,"href":"https:\/\/www.yazilimmutfagi.com\/index.php\/wp-json\/wp\/v2\/comments?post=235"}],"version-history":[{"count":0,"href":"https:\/\/www.yazilimmutfagi.com\/index.php\/wp-json\/wp\/v2\/posts\/235\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.yazilimmutfagi.com\/index.php\/wp-json\/wp\/v2\/media?parent=235"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.yazilimmutfagi.com\/index.php\/wp-json\/wp\/v2\/categories?post=235"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.yazilimmutfagi.com\/index.php\/wp-json\/wp\/v2\/tags?post=235"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}