Small Basic - GraphicsWindow - Bölüm 2

       Bir önceki bölümde GraphicsWindow özelliğine giriş yapmıştık. Bu bağlantıdan giriş yazısına ulaşabilirsiniz.

       Şimdi ikinci bölüme başlayalım. GraphicsWindow yalnızca pencere oluşturmak için kullanılmıyor elbette. Oluşturduğunuz pencerede istediğiniz şekilleri çizmeniz de mümkün.

Draw ile başlayan çizimleri üstteki resimde görebilirsiniz.

Çizgiler ile başlayalım:

Burada kullanmamız gereken 4 parametre(x1,y1,x2,y2) var. Önce bunları açıklayalım:

Kodlar:

GraphicsWindow.DrawLine(20, 20, 200, 30) 

x1 ve x2: Eğer x'lerden birini kullanıyorsanız bu pencereye ekleyeceğiniz nesnenin(şekil, metin, buton vb.) pencerenin sol tarafına olan uzaklığını piksel cinsinden ifade etmeniz demektir.

x1: Çizilecek çizginin başlangıç noktasının soldan uzaklığını belirtir. (Burada 20)

x2: Çizilecek çizginin bitiş  noktasının soldan uzaklığını belirtir. (Burada 200)

y1 ve y2: Eğer y'lerden birini kullanıyorsanız bu pencereye ekleyeceğiniz nesnenin(şekil, metin, buton vb.) pencerenin üst tarafına olan uzaklığını piksel cinsinden ifade etmeniz demektir.

y1: Çizilecek çizginin başlangıç noktasının üstten uzaklığını belirtir. (Burada 20)

y2: Çizilecek çizginin bitiş  noktasının üstten uzaklığını belirtir. (Burada 30)

        Şimdi iki çizgisi farklı renkte ekrana bir X çizelim:

Kodlar:

GraphicsWindow.Width = 200
GraphicsWindow.Height = 200
GraphicsWindow.PenColor = "Green"
GraphicsWindow.DrawLine(10, 10, 100, 100)
GraphicsWindow.PenColor = "Gold"
GraphicsWindow.DrawLine(10, 100, 100, 10)

Kodları açıklayalım:

1-2: Önceki derste öğrendiğimiz genişlik ve yükseklik kodları.
3-5: Bu iki satır, kendisinden sonra gelen çizimlerin rengini değiştirir. Bu satırdan önce çizilen hiçbir şeyin rengini değiştirmez.
4-6: X işareti oluşturacak çizgiler için gerekli konumların girildiği kodlardır.

Eğer üstteki kodalrı aşağıdaki şekilde yazarsak çizgi kalınlığını da değiştirebiliriz:

Kodalr:

GraphicsWindow.Width = 200
GraphicsWindow.Height = 200
GraphicsWindow.PenWidth = 10
GraphicsWindow.PenColor = "Green"
GraphicsWindow.DrawLine(10, 10, 100, 100)
GraphicsWindow.PenColor = "Gold"
GraphicsWindow.DrawLine(10, 100, 100, 10)

 Gördüğünüz gibi üstteki tek farklı satır kırmızı renkte olan satır. Bu da çizilen çizgilerin kalınlığını belirtir. Yukarıdaki kodu çalıştırırsanız aşağıdaki sonucu alırsınız:

Şimdi de daha önce öğrendiğimiz For döngüsünü farklı kalınlıklardaki çizgileri çizmek için kullanalım:

Kodlar:

GraphicsWindow.BackgroundColor = "Black"
GraphicsWindow.Width = 200
GraphicsWindow.Height = 160
GraphicsWindow.PenColor = "Blue"
For i = 1 To 10  
  GraphicsWindow.PenWidth = i  
  GraphicsWindow.DrawLine(20, i * 15, 180, i * 15)
EndFor

Sonuç:

Bir sonraki ders GraphicsWindow ile devam edeceğiz. Bölüm 1 için tıklayın.