Sonuçlar 1 to 2 of 2

Konu: TreeView - Ağaç Görünümü (v.,basic Kaynak-1)

  1. #1

    Default TreeView - Ağaç Görünümü (v.,basic Kaynak-1)

    TreeView - Ağaç Görünümü

    Bilgileri ve alt bilgileri dallanarak sistematik bir sekilde gösteren bir liste kutusudur.

    Dim dal As Node

    Set dal = TreeView1.Nodes.Add(arg1, arg2, arg3, arg4)



    arg1 : Yeni düğümün bağlanacağı düğüm

    arg2 : Düğüm tipi

    tvwChild : Çocuk düğümdür ve bu Visual Basicte parametresi ile belirtilir

    tvwFirst : İlişkili düğümle aynı düzeydeki ilk kardeş düğüm

    tvwLast : İlişkili düğümle aynı düzeydeki son kardeş düğüm

    tvwNext : İlişkili düğümle aynı düzeydeki ve bir sonraki kardeş düğüm

    tvwPrevious : İlişkili düğümle aynı düzeydeki ve bir önceki kardeş düğüm

    arg3 : Düğüm erişim anahtarı

    arg4 : Düğüm adı

    EnsureVisible : Oluşturulan ağacı gösterir



    Private Sub Form_Load()

    Dim noded As Node

    Set noded = TreeView1.Nodes.Add(, , , "Lise") ‘ 1. başlık

    Set noded = TreeView1.Nodes.Add(1, tvwChild, , "Aşağı Lise")

    Set noded = TreeView1.Nodes.Add(1, tvwChild, , "Yukarı Lise")

    Set noded = TreeView1.Nodes.Add(2, tvwChild, , "Lise 1")

    Set noded = TreeView1.Nodes.Add(2, tvwChild, , "Lise 2")

    Set noded = TreeView1.Nodes.Add(2, tvwChild, , "Lise 3")

    Set noded = TreeView1.Nodes.Add(3, tvwChild, , "Lise 1")

    Set noded = TreeView1.Nodes.Add(3, tvwChild, , "Lise 2")

    Set noded = TreeView1.Nodes.Add(3, tvwChild, , "Lise 3")

    Set noded = TreeView1.Nodes.Add(, , , "İlkÖğretim") ‘ 2. başlık

    noded.EnsureVisible ‘ Tüm ağacı göster

    End Sub



    Private Sub Form_Load()

    Dim nodZ As Node

    Set nodZ = TreeView1.Nodes.Add(, , "A", "En Üst", "R1")

    Set nodZ = TreeView1.Nodes.Add("A", tvwChild, "B", "Ara", "R2")

    Set nodZ = TreeView1.Nodes.Add("B", tvwChild, "C", "En Alt", "R3")

    nodX.EnsureVisible

    End Sub



    Private Sub TreeView1_NodeClick(ByVal Node As ComctlLib.Node)

    Select Case Node.Key

    Case "A"

    MsgBox "Bu TreeView nesnesindeki en üst bağlantıdır"

    Case "B"

    MsgBox "A noduna bağlıdır”

    Case "C"

    MsgBox "B noduna bağlıdır”

    End Select

    MsgBox "Tıklanan Dal " + Node.Text

    End Sub


    TreeView - Özellikler


    Appearange

    BorderStyle

    CausesValidation

    CheckBoxes

    Container

    DragIcon

    DragMode

    DropHighLight

    Enabled

    Font

    FullRowSelect

    Height HelpContextID

    HideSelection


    HotTracking

    HWnd

    ImageList

    Indentation

    Index

    LabelEdit

    Left

    LineStyle

    Nodes

    Object

    OleDragMode

    OleDropMode

    Parent

    PathSeparator




    Scroll

    MouseIcon

    MousePointer

    Name

    SelectedItem

    SingleSel

    Sorted

    Style

    TabIndex

    TabStop

    Tag

    ToolTipText

    Top

    Visible

    WhatsThisHelpID

    Width



    ImageList : TreeView içerisinde görüntülenecek resimlerin saklandığı ImageList


    TreeView - Olaylar


    AfterLabelEdit

    BeforeLabelEdit

    Click

    Collapse

    DblClick

    DragDrop

    DragOver

    Expand




    GotFocus

    KeyDown

    KeyPress

    KeyUp

    LostFocus

    MouseDown

    MouseMove

    MouseUp




    NodeCheck

    CodeClick

    OleCompleteDrag

    OleDragDrop

    OleDragOver

    OleGiveFeedBack

    OleSetData

    OleStartDrag

    Validate



    TreeView - Yöntemler


    Drag

    GetVisibleCount

    HitTest


    Move

    OleDrag

    Refresh


    SetFocus

    ShowWhatsThis

    StartLabelEdit

    Zorder

  2. #2

Similar Threads

  1. API Viewer (v.Basic Kaynak-1)
    By Elektronik in forum Visual Basic
    CEvaplar: 1
    Son Mesaj: 24-07-08, 10:55
  2. SQL .V.Basic.(Kaynak-1)
    By Elektronik in forum Visual Basic
    CEvaplar: 1
    Son Mesaj: 24-07-08, 10:02
  3. Dosya Yönetimi (v.Basic Kaynak-1)
    By Elektronik in forum Visual Basic
    CEvaplar: 1
    Son Mesaj: 15-07-08, 11:07
  4. Mönüler-Visual Basic-(Kaynak-1)
    By Elektronik in forum Visual Basic
    CEvaplar: 1
    Son Mesaj: 14-07-08, 18:35
  5. Visual Basic IDE Yapısı--(Kaynak-1)
    By Elektronik in forum Visual Basic
    CEvaplar: 1
    Son Mesaj: 14-07-08, 18:34

Tags for this Thread

Bookmarks

Gönderme izinleri

  • Yeni Konu açamazsınız
  • Konulara cevap yazamazsınız.
  • Eklenti gönderemezsiniz.
  • Mesajlarınızı düzenleme izniniz yok.
  •