Discussion :

[dehorter olivier]

Bonjour a tous

J'aimerais creer une ligne qui lie des elements de 2 listes a la maniere des schema de creation de requetes (ci joint une petite image sur le principe qu'un petit dessin vaut mieux qu'une grande explication).
Evidemment, lorsque l'on bouge l'ascenseur la ligne suit l'element choisit

des idees pour la programmation, voire un composant ???

a+
olivier

[ShaiLeTroll]

Je n'ai pas fait ce genre de chose dans mon appli à Bordel, mais je procéderais ainsi :

- J'aurais une Classe TSchemaEntite et une Classe TSchemaRelation

Quand tu pose une TSchemaRelation entre deux TSchemaEntite, celle-ci s'ajoute dans une TList (ou TObjectList à Owned False) avec ses Coordonnées (Quel Coté : Left/Rigth + Y et Top/Bottom + X)

Le TSchemaRelation possède une fonction DrawLine, qui prend en paramètre les deux TSchemaEntite

TSchemaEntite possède une méthode GetRelationInfo qui renvoie les Coord pour tracer les trais ...

Il te faut gérer un Evènement de Déplacement (soit par MouseMove après un Clic, soit par Drag N Drop) et il faut parcourir la TList, pour notifier aux TSchemaRelation de se redessiner

[dehorter olivier]

bonjour

c'est un peu l'idee que je me faisait, mais je ne suis pas du tout sur d'etre suffisament competant pour faire ce genre de choses.

Je n'y plongerai s'il le faut, mais je serais toute de meme surpris que personne sur le forum n'est pas deja developpe de genre de trucs

ca m'embeterai de reinventer la poudre

a+
olivier

[petitprince]

Il existe déjà ce genre de composant: par exemple le TSimpleGraph de chez http://www.delphiarea.com qui te permet de faire des graphes.
Si tu veux le coder toi même, il y a tous ce qu'il faut sur le forum, une jolie source de waskol me semble-t-il, dessine une ligne entre deux JvCaptionPanel...
Voilà en espérant que sa puisse t'avancer