[delphi 7] faire des dessins cliquables

Bonjour,

Voici mon problème : je dessine sur un canvas un certains nombre de lignes avec les méthodes moveto et lineto.


Existe t'il un moyen d'avoir un événement onclick ou onMouseOver sur ces lignes ?

Pour l'instant de gère la position de la souris pour savoir si je suis sur une ligne (ou pas), mais ça devient lourd !


Le but est de representer un reseau (routier par exemple) et d'avoir des information sur le segment cliqué (nom de la route, type de route...).

Merci

Bonjour

Le problème de détecter le clic sur un segment a été abordé ici il y a pas si longtemps il me semble.

Sinon, en dehors de ton canevas qui est juste là pour représenter ton graphique, il te faut stocker la liste des segments [P1,P2] quelque part (un TStringList par exemple), éventuellement associés à chaque segment, un pointeur sur un objet (ou record) contenant tes infos de routes etc...

Une fois cette liste établie, lors d'un clic souris sur le canevas, il te faut
1. convertir des coord écran, en coord logique (car j'imagine que tu as des coord logiques)
2. tester si ce point +-deltat, se trouve sur un des segments de ta liste.

Pour savoir si un point fait partie d'un segment je te renvoie sur ce post. ou le problème a été abordé.

Pour optimiser ta recherche sur les segments (car si tu as des millions de segments, parcourir cette liste pour tester si ton point en fait partie peu prendre un certains temps), la je te conseille d'exposer ton problème dans le Forum Algorithmes ou je suis sur qu'il y a des méthodes plus rapide, en organisant la liste de segment d'une certaine manière.

Une fois, le segment trouvé par rapport au point demandé -> tu as accès a tes infos routes etc...

Bon courage :)

Salut,

Je ne peux que te conseiller un site qui t'apprendra vraiment des tas de trucs à ce sujet :

:arrow: EFG2 ComputerLab

Plus particulierement avec ce projet :

:arrow: Ligne Elastique

En esperant t'avoir aidé. :coucou:

Bonjour,

Effectivement je suis tomber sur le même problème...J'ai gérer le truc par des trableaux de TPoints et des detections par les Maths.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34

type PointLigne = record Type_route : ansistring; nom: ansistring; Xposition : integer; Yposition : integer; end; type TableauPoints = array of PointLigne;   function TObjetLigne.TestAppartenanceLigne(pointTest:TPoint;pointsCaractéristique;TableauPoints) : integer; var i:integer; L,R,S, Tolerance: Double; X1,X2,Y1,Y2,Y3,X3 : integer; //P1, P2 points extremites, X3 point a tester begin X3:=PointTest.X; Y3:=Pointtest.Y; Tolerance := 7; Result:=-1; for i:=0 to length(PointsCaracteristiques)-2 do begin X1:= PointsCaracteristiques[i].XPosition; // tableau de TPoint à tester Y1:= PointsCaracteristiques[i].YPosition; X2:= PointsCaracteristiques[i+1].XPosition; Y2:= PointsCaracteristiques[i+1].YPosition; L:=SQRT(((X2-X1)*(X2-X1)+(Y2-Y1)*(Y2-Y1))); if l<>0 then begin R:= ((Y1-Y3)*(Y1-Y2)-(X1-X3)*(X2-X1))/(L*L); S:= ((Y1-Y3)*(X2-X1)-(X1-X3)*(Y2-Y1))/(L*L); if (r>0) and (r<1) then if Abs(S*L)<=Tolerance then Result:=i; //s*l=distance end; end; end;

---

A boucler sur tous tes tableaux de TPoints...Et c'est vrai que c'est un peu lourd (alors pense à moi qui doit déplacer les lignes, zoomer, y ajouter des objets... ;) ).
L'avantage c'est que tu peux rajouter des infos particulière dans ton tableaux de TPoints pour chaque segment..

Maintenant si ton problème c'est la vitesse de détection, tu peux toujours effectuer une pré-détection pour savoir si t'es sur une ligne.
Par exemple, en supposant que tes lignes ont des couleurs différents suivant le type de route (comme dans les guides), alors tu pourrais tester la couleur du pixel cliqué pour savoir quelle lignes sont susceptiples d'être sous ton clic.

En tout cas bon courage à toi.

@+.

Bonjour,

Tout d'abord merci à vous pour vos réponses.

En les attendant (vos réponses) j'ai testé une autre solution :

1/ je crée une image avec des lignes qui représente mon reseau > j'affiche cette image
2/ Je créé une seconde image que je n'affiche pas et qui contient les même ligne mais avec chacune une couleur différente (qui correspond à l'index du segment).
3/ sur chaque mouvement de souris je récupere la couleur du pixel de la seconde image et j'ai ainsi l'ID de mon segment.
Nota: les segments de ma seconde image sont plus larges afin de géré un delta de position de la souris.

Vous en pensez quoi ?

Je suis pas un expert, mais j'espère seulement que tu n'as pas trop de segments de lignes à tracer (parceque le nombre de couleurs n'est pas infini, et dépendra de la machine sur laquelle tu feras tourner ton appli).

Bonjour,

Citation:

---

Vous en pensez quoi ?

---

Plutôt astucieux8-)
Petite amélioration (si necessaire) :
- trier les segments par taille,
- tracer les plus petits segments à la fin (ils seront ainsi "au-dessus" des grands)

Citation:

---

Envoyé par planetevoyage

Vous en pensez quoi ?

---

J'ai utilisé la même méthode dans un programme pour que l'utilisateur puisse sélectionner des éléments, plutôt que de devoir stocker les positions (et dimensions) de chaque élément et de devoir comparer la position de la souris avec la fonction PtInRect()... Cela est plus rapide selon moi, surtout que tu disposes qu'en même d'une palette de 16 millions de couleur (non ?), cela te laisse de la marge pour créer des lignes je présume. Le seul hic dans cette méthode, est qu'il te faudra sauver 2 images en fait, donc 2 fois plus de données à charger aussi...

Resterait une solution en utilisant qu'une seule et même image : Utiliser 8 bits (256 couleurs) sur les 16 millions pour sauver les lignes dans la même image. Par exemple, le format PNG (32bits) utilise cette technique pour sauver son masque de transparence alpha en 8bits avec l'image opaque 24 bits. Tu peux aussi envisager d'utiliser 16bits (65536 couleurs) pour les lignes et 16bits pour l'image... Tu peux même créer ton propre format d'image 48 ou 64bits, mais là, on en revient à utiliser la solution des 2 images, excepté qu'elles sont fusionnées. Cela te permettra tout de même d'optimiser les fichiers image sur le disque.

Si tu as d'autres questions, n'hésite pas, à+ ;)

Merci à tous,
Je vais creuser la solution avec 2 images.
A+