Discussion :

[mestressat]

Bonjour à tous.

Je ne rencontre pas vraiment de difficulté, mais étant débutant dans la manipulation de base de données, j'aimerai avoir vos observations sur la réalisation suivante :

Dans une fiche, je remplis un TTreeview à partir d'une base de donnée à laquelle j'ai accès via les composants ADO.

La table à partir de laquelle le Treeview est rempli contient notamment trois champs :
- NumAuto (Clé primaire)
- Nom (Nom affiché dans le Treeview)
- Ordre (Ordre dans lequel l'affichage est fait dans le treeview)

Lors de la sélection d'un élément du Treeview, les valeurs de tous les champs sont affichés dans des DBEdit.

La fiche contient également deux boutons permettant de monter ou descendre le nœud sélectionné dans le Treeview.

Le but est de mettre à jour la table lors du déplacement des nœuds du Treeview en modifiant le champ Ordre.
Par exemple, j'ai les valeurs suivantes contenant l'ordre suivant :
A | 1
B | 2
C | 3
Si je sélectionne le deuxième élément (B) et que je le déplace vers le haut, ma table doit alors être mise à jour ainsi qu'il suit :
B | 1
A | 2
C | 3

J'arrive à faire tout cela, mais je me demande si ma conception est convenable. Merci de me faire part de vos avis sur les deux points suivants :

1° - Pour savoir à quel élément de la table correspond le nœud sélectionné dans le Treeview, j'affecte lors du remplissage du Treeview à chaque Node.Data la valeur contenu dans le champs NumAuto :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
NewNode.Data:=pointer(strtoint(MyQuery.FieldValues['NumAuto']));

Puis lors de la sélection d'un nœud du treeview, je me déplace dans le recordset en récupérant la valeur du data :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
SelectedID:=integer(MyTreeView.Selected.Data);
MyDataSource.DataSet.Locate('NumAuto',SelectedID,[loCaseInsensitive])

2° - Pour remplir le Trreview à partir de la basse de donnée, j'ai recours aux composant ADO suivants :
TADOConnection (Pour me connecter à la base de donnée)
TADOTable (Pour indiquer la table contenant les valeurs à afficher)
TADOQuery (Pour sélectionner les éléments de la tables à afficher)
TdataSource (Je sais pas trop à quoi çà sert mais j'ai ai besoin pour utiliser le TADOQuery, et pour faire des recherches)

Après le déplacement d'un des nœuds du treeview au moyen de la fonction MyNode.MoveTo, il convient de mettre à jour deux valeurs du champs ordre : Celui du nœud déplacé, et celui étant affecté par le déplacement.
Pour cela, je procède ainsi qu'il suit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
MyDataSource.DataSet.Locate('NumAuto',integer(NodeRicochet.Data),[loCaseInsensitive])
MyDataSource.DataSet.Edit;
MyDataSource.DataSet.FieldByName('Ordre').Value:=OrdreAncien;
MyDataSource.DataSet.UpdateRecord;
MyDataSource.DataSet.Locate('NumAuto',integer(NodeToMove.Data),[loCaseInsensitive])
MyDataSource.DataSet.Edit;
MyDataSource.DataSet.FieldByName('Ordre').Value:=OrdreNouveau;
MyDataSource.DataSet.UpdateRecord;

Merci d'avance pour vos remarques et critiques, et notamment, de l'utilisation :
- Du Data du nœud pour connaître à quel enregistrement de la base de donnée correspond l'élément sélectionné dans le Treeview
- De la fonction Locate pour se positionner sur l'enregistrement souhaité et de l'utilisation du composant DataSource pour modifier les valeurs.

A+

[Cl@udius]

Salut

Sur le principe je dirais tout cela reste cohérent, cependant j'ai quelques remarques:

1. Dans la mesure où il n'y a pas de hiérarchie Père/Enfant dans tes données pourquoi avoir choisi un TTreeView ?
2. Je ne vois pas dans l'immédiat l'intérêt d'utiliser un TADOTable et un TADOQuery. Un seul devrait suffire tant pour l'affichage que pour le déplacement.

De plus:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
NewNode.Data:=pointer(strtoint(MyQuery.FieldValues['NumAuto']));

Ton champ NumAuto est de type string ?

TdataSource (Je sais pas trop à quoi çà sert mais j'ai ai besoin pour utiliser le TADOQuery, et pour faire des recherches)

Je pense qu'il est surtout là pour effectuer la liaison avec tes TDBEdit.

Voilà.

@+ Claudius

[edam]

numauto est integer

MyDataSource.DataSet.Locate('NumAuto',integer(NodeToMove.Data),[loCaseInsensitive])

mais ma question est sur

MyDataSource.DataSet.UpdateRecord;

, il est normalement utilisé avec le cache non??
pour locate c'est ce que j'utlise moi aussi (avec des petit et moyen BD)

[mestressat]

Merci pour vos remarques.

Pour répondre à vos questions :
- J'ai choisi un Treeview parce qu'il y a une hiérarchie... mais mes interrogations n'étant pas sur ce point, je n'ai pas indiqué la totalité des champs de ma table pour essayer de ne pas noyer ma demande dans un flot d'informations sans intérêts
- Mon Champs NumAuto est de type Integer. Je vais essayer cela :
NewNode.Data:=pointer(MyQuery.FieldValues['NumAuto']);
- Je ne sais pas ce qu'est le cache. J'utilise UpdateRecord pour enregistrer les modifications. Vaut-il mieux un post ?

Et pour rebondir, pour les grosses BD, que faut-il utiliser à la place de locate ?

Enfin, j'ai souvent poser des questions dans les forums, mais je suis rarement capable d'apporter des réponses aux autres.
Cependant là, je me suis bien pris la tête avec le Treenode et sa relation avec une base de donnée. Je pense pouvoir faire partager cette petite expérience. Pourrait-il être utile que je retranscrive cela dans une sorte de tutoriel ? Si oui, quelqu'un pourra-t-il me corriger ?

Merci encore à tous

A+

[colfire_dev]

Personnelement j'utilise Locate pour mes recherches sinon je passe par des requêtes SQL c'est plus pratique.
Quant au choix entre post et Updaterecord, la différence à ma connaissance n'est pas très grande.
Un conseil DBNavigator à éviter avec ADO