Forumlar
Yeni Mesajlar
CerezExtra
EĞLENCE ↓
Şans Kurabiyesi
Renk Falınız
ÇerezRADYO
Sevgiliye Özel
ÇerezDERGİ
Hızlı Okuma Testleri
Pratik Çözümler
Yeniler
Yeni Mesajlar
Yeni ürünler
Yeni kaynaklar
Son Aktiviteler
İndir
En son incelemeler
Dükkan
Giriş
Kayıt
Yeniler
Yeni Mesajlar
Menu
Giriş
Kayıt
Uygulamayı yükle
Yükle
Forumlar
Bilgisayar & Cep & Teknoloji
Programlama Dilleri
Delphi İle Başlangıç
Buton Stilini Değiştirmek ve Görev Atamak - Delphi XE7
JavaScript devre dışı bırakıldı. Daha iyi bir deneyim için, devam etmeden önce lütfen tarayıcınızda JavaScript'i etkinleştirin.
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an
alternative browser
.
Konuya cevap yaz
Mesaj
<blockquote data-quote="YoRuMSuZ" data-source="post: 823857" data-attributes="member: 1"><p>Delphi'nin XE7 sürümünde buton stilini değiştirip, butona farklı görevler atamak için aşağıdaki küçük çalışmayı yapınız. Buradaki örneği kendinize göre geliştirip istediğiniz gibi kullanabilirsiniz... Bu örnekte ComboBox bileşenindeki seçime göre butonun şeklini değiştirip, PopupMenu ekliyoruz.</p><p></p><p><u>Forum üzerine 1 adet ComboBox, 1 adet Button ve 1 adet PopupMenu bileşeni bırakınız.</u></p><p></p><p>Forumun <strong>OnCreate </strong>yordamına aşağıdaki kodları yazın.</p><p>[CODE] ComboBox1.AddItem('bsPushButton',nil);</p><p> ComboBox1.AddItem('bsCommandLink',nil);</p><p> ComboBox1.AddItem('bsSplitButton',nil);[/CODE]</p><p>Böylece ComboBox 'un açılır menüsünü otomatik olarak oluşturmuş olduk.</p><p></p><p><strong>ComboBox1Change </strong>yordamına aşağıdaki kodları ekleyelim.</p><p>[CODE] if ComboBox1.ItemIndex = 0 then</p><p> Button1.Style := bsPushButton;</p><p> if ComboBox1.ItemIndex = 1 then</p><p> Button1.Style := bsCommandLink;</p><p> if ComboBox1.ItemIndex = 2 then</p><p> Button1.Style := bsSplitButton;[/CODE]</p><p>Artık ComboBox 'taki seçime göre butonumuzun stili değişiyor.</p><p></p><p>Son olarak <strong>SplitButton </strong>özelliğinin açılır menüsüne <strong>PopupMenu </strong>içeriğini ekleyelim. (PopupMenu içeriğini istediğiniz gibi doldurun)</p><p></p><p>Bunun için Button'un <strong>OnDropDownClick</strong> yordamını aşağıdaki kodu ekleyerek PopupMenu yü aktif ediyoruz...</p><p>[CODE]Button1.DropDownMenu := PopupMenu1;[/CODE]</p><p></p><p>[ATTACH=full]86640[/ATTACH]</p></blockquote><p></p>
[QUOTE="YoRuMSuZ, post: 823857, member: 1"] Delphi'nin XE7 sürümünde buton stilini değiştirip, butona farklı görevler atamak için aşağıdaki küçük çalışmayı yapınız. Buradaki örneği kendinize göre geliştirip istediğiniz gibi kullanabilirsiniz... Bu örnekte ComboBox bileşenindeki seçime göre butonun şeklini değiştirip, PopupMenu ekliyoruz. [U]Forum üzerine 1 adet ComboBox, 1 adet Button ve 1 adet PopupMenu bileşeni bırakınız.[/U] Forumun [B]OnCreate [/B]yordamına aşağıdaki kodları yazın. [CODE] ComboBox1.AddItem('bsPushButton',nil); ComboBox1.AddItem('bsCommandLink',nil); ComboBox1.AddItem('bsSplitButton',nil);[/CODE] Böylece ComboBox 'un açılır menüsünü otomatik olarak oluşturmuş olduk. [B]ComboBox1Change [/B]yordamına aşağıdaki kodları ekleyelim. [CODE] if ComboBox1.ItemIndex = 0 then Button1.Style := bsPushButton; if ComboBox1.ItemIndex = 1 then Button1.Style := bsCommandLink; if ComboBox1.ItemIndex = 2 then Button1.Style := bsSplitButton;[/CODE] Artık ComboBox 'taki seçime göre butonumuzun stili değişiyor. Son olarak [B]SplitButton [/B]özelliğinin açılır menüsüne [B]PopupMenu [/B]içeriğini ekleyelim. (PopupMenu içeriğini istediğiniz gibi doldurun) Bunun için Button'un [B]OnDropDownClick[/B] yordamını aşağıdaki kodu ekleyerek PopupMenu yü aktif ediyoruz... [CODE]Button1.DropDownMenu := PopupMenu1;[/CODE] [ATTACH type="full" alt="Buton Stilini Değiştirmek ve Görev Atamak"]86640[/ATTACH] [/QUOTE]
Alıntıları ekle...
İsim
Spam kontrolü
En iyi yönetim şekli?
Cevapla
Forumlar
Bilgisayar & Cep & Teknoloji
Programlama Dilleri
Delphi İle Başlangıç
Buton Stilini Değiştirmek ve Görev Atamak - Delphi XE7
Top