[Ttreeview] Autoscroll?

Version imprimable

02/07/2004, 16h08
Superstivix

[Ttreeview] Autoscroll?

Bonjour à tous,

Voila le problème, j'ai réalisé un drag & drop sur un TTreeview, le problème est que lorsque je prends un noeud et que le pointeur de la souris dépasse le cadre supérieur de l'arbre il ne se passe, or je souhaiterais que les noeuds de l'arbre défilent de manière à pouvoir afficher les noeuds supérieurs.

J'ai cherché une fonction du style autoscoll sans succès.
J'espère que quelqu'un sait faire ça.

Steve
04/07/2004, 16h14
Invité

Autoscroll sur un Treeview

Bonjour,

Effectivement, avoir un défilement de l'arbre de vue quand on survole le haut ou le bas de l'arbre est intéressant (comme dans l'explorateur Windows par exemple).

J'ai déjà fait des recherches sur ce problème ici :
http://www.developpez.net/forums/vie...518&highlight=

Je n'ais malheureusuement pas trouvé de solution satisfaisante.

J'espère que tu trouveras...

Bon courage !
05/07/2004, 08h34
Invité

TopItem

Ah, j'ai vu dans un sujet précédent pour un TListView que l'on pouvait utiliser la propriété TopItem, je vais essayer...
05/07/2004, 09h05
Superstivix

Re: Autoscroll sur un Treeview

Citation:

Envoyé par Kaji

Bonjour,

Effectivement, avoir un défilement de l'arbre de vue quand on survole le haut ou le bas de l'arbre est intéressant (comme dans l'explorateur Windows par exemple).

J'ai déjà fait des recherches sur ce problème ici :
http://www.developpez.net/forums/vie...518&highlight=

Je n'ais malheureusuement pas trouvé de solution satisfaisante.

J'espère que tu trouveras...

Bon courage !

J'avais déja trouvé ce sujet mais malheureusement ça ne marche pas, j'essaye de l'adapter mais pour l'instant sans succès :cry:

Si quelqu'un connait la solution je suis preneur, d'ici là je continue les recherches

Steve

Rebonjour à tous,

voila j'ai résolu mon problème, je donne le code pour ceux que ça peut intéresser.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
TTreeView *Organigramme;
...
if (State == dsDragMove && Y > 0 && Y < Organigramme->Height)
{
  TTreeNode * NoeudTampon;
  TTreeNode * DernierVisible;
  NoeudTampon = Organigramme->GetNodeAt(X,Y);
  DernierVisible = Organigramme->GetNodeAt(X,Organigramme->Height - 10);
  if(NoeudTampon != NULL)
  {
    if( NoeudTampon == Organigramme->TopItem )
    {
       Organigramme->TopItem = Organigramme->TopItem->GetPrev();
       Organigramme->Repaint();
    }
    else if( NoeudTampon == DernierVisible && DernierVisible->GetNext() != NULL)
    {
      Organigramme->TopItem = Organigramme->TopItem->GetNext();
      Organigramme->Repaint();
    }
  }

C'est assez simple je pense mais si quelqu'un a la moindre question qu'il n'hésite pas, ce code est à mettre dans l'événement DragOver de l'arbre.

A plus
Steve

05/07/2004, 16h18
totof42

Salut,

une toute petite remarque : si jamais ton TreeView a une scrollbar horizontale (d'une épaisseur supérieure à 10), par exemple quand tu étends plusieurs sous-noeuds, il ne scrollera plus !

Il vaut mieux utiliser

Code:

DernierVisible = Organigramme->GetNodeAt(X,Organigramme->ClientHeight - 10);

plutôt que

Code:

DernierVisible = Organigramme->GetNodeAt(X,Organigramme->Height - 10);

Voili, j'avais dit que c'était un détail :wink:

Merci en tout cas pour ton code, ça ma permis d'ajouter cette facilité avant que le client ne me la demande !
A++
05/07/2004, 16h28
Superstivix

Merci de ta précision,
je n'y avais pas prété attention car dans les arbres que j'ai dans mon projet je ne peut pas avoir de ScrollBar horizontale, donc pas de souci pour moi.
Par contre le code risque d'être réutilisé pour d'autres projets et la configuration pourra être différente donc mieux vaut prévenir que guérir comme on dit.

De rien pour le code
Vraiment ravi que ça puisse servir à d'autres.
Bon courage
A plus
Steve