ActiveX-Liste
lima-city → Forum → Programmiersprachen → Basic
anklicken
art
basteln
bild
einfacher eintrag
form
frage
funktionieren
kleinen editor
knoten
krieg
liste
listen
problem
prozedur
set
verweis
verwenden
verwendungszweck
windows
-
Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!
lima-city: Gratis werbefreier Webspace für deine eigene Homepage
-
hi..!
geh mal in Men? "Projekt" -> "Komponenten" (oder dr?ck Strg+T) und w?hl dort "Microsoft Windows Common Controls" aus.
Die Version ist abh?ngig vom verwendungszweck:
-> wenn du windowsxp-visual styles verwenden m?chtest musst du die version 5.0 nehmen
-> die version 6.0 hat mehr optionen als die 5.0.. wenn du also keinen wert auf xp-styles setzt, dann nimm das.
nun siehst du links in der control-liste ein kleines icon ("TreeView"). das musst du anklicken und ganz normal auf die form zeichnen.
und so f?gst du elemente hinzu:
das TreeView bietet daf?r eine eigenschatt "Nodes" ("Knoten") an, welche einen verweis auf alle eintr?ge liefert. ein einfacher eintrag kann also so hinzugef?gt werden:
call me.TreeView1.Nodes.Add(,,,"Knoten")
um schnell einen knoten zu finden empfiehlt es sich einen eindeutigen key zu verwenden:
call me.TreeView1.Nodes.Add(,,"Knoten1","Knoten")
m?chtest du nun einem Knoten einen anderen knoten hinzuf?gen musst du der prozedur mitgeben, welcher knoten der ?bergeordnete ist:
Dim nodNode as Node
Dim nodSubNode as Node
Dim nodSubSubNode as Node
Set nodNode = Me.TreeView1.Nodes.Add (,,,"Knoten1")
Set nodSubNode = Me.TreeView1.Nodes.Add (nodNode,tvwChild,,"UnterKnoten1")
Set nodSubSubNode = Me.TreeView1.Nodes.Add (nodSubNode,tvwChild,,"UnterUnterKnoten1")
usw... (code m?sste funktionieren, hab ihn nicht ?berpr?ft..)
bei weiteren fragen, einfach fragen ;)
-
Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!
lima-city: Gratis werbefreier Webspace für deine eigene Homepage