Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Tree View Control
Message
 
À
01/04/2002 11:56:23
Hisham Serry
Al-Bahar United Company
Kuwait, Kuwait
Information générale
Forum:
Visual FoxPro
Catégorie:
Contrôles ActiveX en VFP
Divers
Thread ID:
00639501
Message ID:
00639545
Vues:
22
>Hi All,
>
>I would like to know how to add nodes to a treeview if example is a avilable I will be happy.
>
>
>Hisham
Her's something you can enter from cammand window:
ofm=createobject('form')
ofm.show
ofm.addobject('oTV','Olecontrol','MSComctlLib.TreeCtrl.2')
foo=ofm.otv
foo.height=ofm.height
foo.width=ofm.width
foo.linestyle=0
foo.style=7
foo.hideselection=.f.
foo.fullrowselect=.t.
foo.visible=.t.
foo.Nodes.Add(,1,"KEY_R1","TEXT_R1",,)
foo.Nodes.Add(,1,"KEY_R2","TEXT_R2",,)
foo.Nodes.Add('KEY_R1',4,"KEY_R1L1",[TEXT_R1L1],,)
foo.Nodes.Add('KEY_R1L1',4,"KEY_R1L1C1",[TEXT_R1L1C1],,)
foo.Nodes.Add('KEY_R1L1',4,"KEY_R1L1C2",[TEXT_R1L1C2],,)
foo.Nodes.Add('KEY_R1',4,"KEY_R1L2",[TEXT_R1L2],,)
foo.Nodes.Add('KEY_R1L2',4,"KEY_R1L2C1",[TEXT_R1L2C1],,)
There are articles in UT mag. Cetin wrote one in June. Check those articles out!
Imagination is more important than knowledge
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform