Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Any one interested in some TreeView Gotcha's (ActiveX) ?
Message
 
À
16/06/1998 03:03:30
Jeroen Naus
Harte-Hanks Europe
Hasselt, Belgique
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00108405
Message ID:
00108612
Vues:
36
>*To set an imagelist you do. (old one)
>thisform.treeview.imagelist = imagelist.object
>
>*How to create a right nodeclick event ? (easy one, nice for popup menus)
>Create a flag property (call it rightclicked or something). On the mousedown event set it to .T. if they rightclicked, else set it to .F. . On the nodeclick event you can check if they rightclicked. If they did the event occurs en you execute whatever you want and set the flag back to .F. .
>
>*How to create a right double nodeclick event ? (a bit more complex)
>Create a flag property (call it readyfordoublenodeclick or something). On the nodeclick set it to .T. (You can also set it to .T. if it hasn't got any children. Default behavior of the doubleclick is expand, but if they doubleclcicked the last one in line you would like to do something else, like open a window) In the doubleclick method if the nodeclick event occured execute your doublenodeclick method. In the Mousedown event set the flag back to .F. .
>
>*Having refresh problems when resizing ? (hard one to find)
>thisform.treeview.visible = .F.
>thisform.treeview.top = thisform.treeview.top + 9999
>thisform.treeview.top = thisform.treeview.top - 9999
>thisform.treeview.visible = .T.
>This is actually one of Ken Levy's tricks to optimize filling the tree but it also works for refreshing (believe me all else fails, i tried)
>thisform.treeview.visible = .F.
>thisform.treeview.top = thisform.treeview.top + 9999
>-fill the tree here
>thisform.treeview.top = thisform.treeview.top - 9999
>thisform.treeview.visible = .T.
Jeroen,

You might want to look into submitting this message to the Knowlede Base for TreeView controls.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform