[VB.NET]Color & Font Dialog Kullanımı

Antidote

Özel Üye
Katılım
21 Ocak 2014
Mesajlar
1,015
Tepkime puanı
0
Puanları
0
Web sitesi
ajanlar.org
Size Visual Basıc Netteki 2 Dialog Penceresini nasıl kullacagımızı Gösterdim.
Color Dialog
Custom_Color_Dialog_Box.PNG

OBbEzz.png

Kodların Hepsi
[hide]
PHP:
 cdcolor.Color = Me.BackColor
            cdcolor.ShowDialog()
            Me.BackColor = cdcolor.Color
[/hide]
Kodların Açıklaması
İlk Başta Bir buton eklicez
YJy4pj.png

Butona Tıklayıp Aşagıdaki Verdigim Kodları yazıyoruz :)
Normalde Colordialog1 olur adı ama ben cdcolor yaptım.
PHP:
cdcolor.Color = Me.BackColor
Yukardaki Kodda color dialogumuzun değerleri Formun arkaplan renginden almasını sağlıyoruz.
PHP:
cdcolor.showdialog()
Yukardaki kod ile butona tıkladımızda colordialog penceresinin açılmasını saglıyoruz.Rengimizi Seciyoruz.
PHP:
Me.backcolor = cdcolor.color
Burda ise arkplan rengini cdcolor a atadımız renkten alıyoruz. Ve Sonuç
p9AEl0.png

Font Dialog
vb.net-font-dialog-box.jpg

Kodların Hepsi
[hide]
PHP:
        fddialog.Font = Me.Font
        fddialog.ShowDialog()
        Me.Font = fddialog.Font
[/hide]
Bir Buton
yRWN8n.png

Butona Tıklayıp Aşagıdaki Verdigim Kodları yazıyoruz :)
NormaldeFontdialog1 olur adı ama ben fddialog yaptım.
Kodların Açıklaması
PHP:
 fddialog.Font  = Me.Font
Yukarda Font dialogun içindeki font değerini formumuzun font değerine eşitledik
PHP:
 fddialog.ShowDialog()
Font dialog penceresinin açılmasını saglıyoruz :huh:
PHP:
Me.Font = fddialog.Font
Ve formuzun font değerini fontdialogdan alıyoruz :sp:
Ve Çıktıya Bakalım :)
RBA1Bo.png

Formun üzerinde değerleri değil bir butonuda değiştirebilirsiniz
misal
Me.font yerine label.font yazarsanız sadece labeli değiştirir
Misal
Me.backcolor yerine label1.forecolor yada label1.backcolor yazarsanız bu sefer label1 ögesinin yazı rengini veya arkplan rengini değiştirir :fikir:
Anlatım bana Aittir.Hiçbir Forumdan alıntı değildir.
 

KingDoz

Forumdan Uzaklaştırıldı
Katılım
23 Haz 2015
Mesajlar
1,403
Tepkime puanı
0
Puanları
0
Yaş
32
Helal kanka 3 jj attım ard arda bunun yuzunden :D
 

Antidote

Özel Üye
Katılım
21 Ocak 2014
Mesajlar
1,015
Tepkime puanı
0
Puanları
0
Web sitesi
ajanlar.org
Saolun :)
 

captainbrain

Prof Spys-z
Katılım
15 Ağu 2015
Mesajlar
1,006
Tepkime puanı
0
Puanları
0
Ellerine sağlık yusuf
 

JosephCraig

Yeni Üye
Katılım
10 Kas 2015
Mesajlar
62
Tepkime puanı
0
Puanları
0
adaş yıl 2015 sen hala vb.net :D adaşımı kızdırayım az adaş yıl 2015 :D
 
Üst
Copyright® Ajanlar.org 2012