canvas sur shape et GroupBox

Voila je dois utiliser un canvas qui me dessine un trait en fonction de la position du curseur et je rencontre 2 problèmes :
- Je n'arrive pas à actualiser la ligne que je dessine il me la laisse afficher
- Le trait que je dois dessiner se situe sur 4 éléments de type shape et le problème est que je n'arrive pas à positionner le trait que je réalise grâce au canvas par dessus, j'ai bien utiliser une Timage mais ensuite il ne m'affiche plus les shape car il se trouve au dessus (le reste de l'image se transformant en couleur blanche)

Après approfondissement mon problème est que j'arrive pas à dessiner sur un TGroupeBox

à priori le groupbox n'a pas de Canvas donc tu ne pourra pas dessiner dessus
ne peux-tu pas le remplacer par un bevel + un label ?

Bonjour,

Le plus simple pour comprendre commen re-dessinez TShape est de regarder dans le code de TShape.

1° Ouvrez l'unité ExtCtrl (pour Delphi 7)
2° Rechercher TShape.Paint
3° rechercher le canvas de TShape a partir de l'utilisation dans TShape.Paint

Explication:
TShape est dérivé de TGraphicControl (unité Controls)
Le canvas de TGraphicControl est de type "protected".
Le canvas est donc accesible en interne dans le composnt et non en externe.

Pour avoir acces au canvas, il vous faut dérivé le composant en mettant l'acces au canvas en public.