Sayın Mehmeser, regedit'de olduğu gibi treeviewde ekleme olmaz. Değiştirme olabilir ya da tut treeview de başka bir kolun üzerine bırak da olabilir.
Diğer istedeğinize gelince; noda tıklayınca ona ait bilgi gelir ve o noda ekleme yapabilirsiniz diğer istediğiniz de olur. Noda tıklayınca yanda ona ait bilgiler gelir. Seçili konuma ya da ona alt birim ekleyebileceğiniz bir formda yapılabilir.
Altta verdiğim kod treeviewin tıklama sonunda nod daki bilgiyi veren kod formuna bir metin kutusu koy, adı Metin5 olsun. Tıklayınca veri o metin kutusuna gelsin. Artık geri kalanı senin hayaline kalmış bir şey. İster bu bilgi ile kişinin ayrıntılarını getirirsin, ister noda alt nod eklersin. Artık sen ne yapmak istersen...
Kod:
Private Sub Treeview1_Click()
Dim nodSelected As MSComctlLib.Node
Set nodSelected = Me.TreeView1.SelectedItem
If nodSelected.Key Like "H1*" Then
Me.Metin5 = Mid(nodSelected.Key, 3)
ElseIf nodSelected.Key Like "PA*" Then
Me.Metin5 = Mid(nodSelected.Key, 3)
Else
Me.Metin5 = Null
End If
End Sub
ÇOK TEŞEKKÜRLER
Merhaba Eşref Bey,
Verdiğiniz kodu denedim ama olmadı benim örneğimde. İstediğim şey, TreeView'de gezerken seçtiğim dalların id koduna eşit kaydın formda geçerli kayıt olması.
Örneğimde dalların sonunda yazan numaralar tablodaki BirimId alanı. Alt dalları bu nolara bakıp BirimUstId alanına yazarak ekliyorum. Eğer TreeView'den seçili kayıt otomatik olarak formun geçerli kaydı olursa çok daha iyi olacak.
Teşekkürler.
Sayın mehmeser, siz benim gönderdiğim örneğe göre tablolarınızı düzenlerseniz daha iyi olur. Bakın, alıntı kod ile bir şey yapılır, ancak bir yer gelir işte böyle tıkanırsınız. Ondan dolayı ben treeview i böyle açıklamalı verdim ki en başından itibaren kendiniz tasarlayın diye. Bu kadar mı zor tabloları yeniden düzenlemek.
Birimin alt birimi ve onun da alt birimi
Yani branşın öğretmeni onun da hobisi
İnanın ben sizin şimdi bu sorduğunuz soruyu çözerim ancak bu size fayda değil zarar verir. Bilmediğiniz bir kod üzerinde veritabanı yürür ve bir yerde yine tıkanırsınız. Gelin yol yakınken tablo yapınızı değiştirin...
Teşekkürler,
Zaten ilk mesajınızı görünce sevindim ve hemen baktım fakat sizin tablo yapınız daha alt birimler eklemek için esnek değil ya da ben anlamadım vermek istediğinizi. Diyelim ki hobilerin altına da bir alt dala daha eklemek istersek nasıl olacak?
Ben bu ağaç yapısını kurumlara ait birimleri eklemek için kullanacağım. Bir kurumun 5 alt decereli birimi olabilir diğerinin 8 ya da 10 gibi. İsteyen istediği kadar ana dala alt birim ekleyecek. Sanırım sizin örneğiniz buna müsait değil? Eğer mümkünse nasıl olabilir fikir verirseniz memnun olurum.
Kesinlikle doğrudur, bildiğimiz yoldan gitmeliyiz. Ama bazen mecbur kalıyoruz. Kullandığım tablo yapısını bilerek kullandım, sadece kodları başka yerden almıştım. Eğer istediğim için bir tablo yapısı mevcut ise başka yoldan seve seve değiştiririm.
Görüşlerinizi bekliyorum. Teşekkürler.
Sayın Mehmet eser
sizin istediğiniz gibi sınırsız nod ve alt nod ekleyen seçili olan kaydın idsini getiren bir örnek ektedir treeview nodlama tek bir koddur diğer kodlar ekleme silme vsvs kodlardır herzaman yaptığım gibi bundaki kodları açıklamayacağım çünkü ado kodlarını ado örneğimde açıkladım diğer silme alt silme olayına gelince siz bir üst nod silince önce o noda ait alt nodları siliyor sonrada üst nodu siliyor bunu özellikle yaptım çünkü tanlışlıkla üst nodu silince arıza veriyordu neyse şu anda tam stabil şekilde çalışan bir örnek var elinizde kayıtların id sini form üzerine almayıda ekledim sanırım siz onunla form üzerinde bilgi bulduracaksınız onlarıda yaparsınız üst nodalrın alt idsi 0(sıfır) olamk zorunda ondan dolayı form üzerine üst nod eklemek için bir sıfırla butonu koydum diğerleri nodlara tıklıyorsun ve ekleyeceğin alt nodu yazıyorsun ekle diyorsun sana ekliyor böylece alt nod alt nod alt nod alt nod alt nod diye binlerce alt nod ekleyebilirsin
ayrıca formun üzerine treeview e tıklayınca kayıt bulmada ekledim