Discussion :

[androz]

Hello

Voilou, j'essaie de faire un petit truc avec une TPaintBox...

Dans une TPaintBox, je construis une TBitMap. Dans cette TBitMap, je dessine un curseur en forme de croix sous la méthode OnMouseMove de la TPaintBox. Ainsi, je voudrais que la fameuse crois se déplace en même temps que je déplace ma souris sur le TPaintBox. Jusque là, je n'ai pas vraiment trouvé de solution si ce n'est de redessiner un rectangle blanc par dessus tout pour réinitialiser mon image, et enfin dessiner la croix dont la position a été actualisée. Bon ok je peux être plus flou si vous voulez, mais en gros, voici le genre de code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
  BitMap = new Graphics::TBitmap;
  BitMap->Width  = PaintBox1->Width;
  BitMap->Height = PaintBox1->Height;
}
 
void __fastcall TForm1::PaintBox1MouseMove(TObject *Sender,
      TShiftState Shift, int X, int Y)
{
   BitMap->Canvas->Pen->Color = clWhite;
   BitMap->Canvas->Brush->Color = clWhite;
   BitMap->Canvas->Rectangle(0, 0, PaintBox1->Width, PaintBox1->Height);
   PaintBox1->Canvas->Draw(0, 0, BitMap);
   BitMap->Canvas->Pen->Color = clRed;
   BitMap->Canvas->MoveTo(X-20,Y);
   BitMap->Canvas->LineTo(X+20,Y);
   BitMap->Canvas->MoveTo(X,Y-20);
   BitMap->Canvas->LineTo(X,Y+20);
   PaintBox1->Canvas->Draw(0, 0, BitMap);
}

Comme vous le voyez, avant de dessiner la croix, je dessine un rectangle ayant les mêmes dimensions que la Paintbox afin de tout effacer. Seulement ça ne me convient pas. En effet, la prochaine étape serait de dessiner une image de fond, par exemple un rectangle, image qui resterait là tout le temps, et de n'actualiser qu'un seul élément, le fameux curseur.
J'ai fouillé un peu dans le forum, j'ai eu du mal à trouver une solution à mon problème. J'ai essayé le mode pmXor pour la propriété pen->mode, mais bof bof.

Est-ce que quelqu'un aurait une idée ?

[henderson]

Salut !

Est-ce que ça peut convenir :

Code :

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

1
2
 
PaintBox1->Cursor = crCross;

A plus !

[blondelle]

Salut androz
j'ai realise un viseur que l'on peut deplacer sur un TAnimate qui affiche l'image d'une WebCam pour cela j'ai utilise une Form transparante sans bordure la croix est sur la Form, donc pas de probleme avec l'image du dessous
Deux liens sur le sujet

http://www.developpez.net/forums/d26...leme-tanimate/
http://www.developpez.net/forums/d40...appuie-button/

[androz]

Hello

Merci Blondelle pour cette réponse, l'astuce de mettre deux Forms en jouant sur la transparence est intéressante..

Seulement ça ne résout qu'une partie de mon problème. Je peux maintenant afficher une image et faire des tracers par-dessus, sauf que je suis obligé encore "d'effacer" (en fait de tracer un rectangle blanc) mon bitmap avant d'afficher un nouveau curseur à la nouvelle position. De plus, si je fais ça, et bien du coup je ne vois plus l'image en-dessous.

Donc dans un premier temps, j'essaie d'actualiser mon curseur, c'est-à-dire de l'afficher à une nouvelle position à chaque déplacement de la souris dans la PaintBox. Je voudrais le faire sans avoir à redessiner un rectangle tout blanc par dessus à chaque fois, mais est-ce possible ??? Et autre question ensuite, y'a-t-il un moyen d'afficher deux BitMaps sur une même PaintBox (autre manière que celle proposée par Blondelle) ?

[blondelle]

Tu trace ton curseur sur la Form du dessus et tu deplace cette Form, ca donne l'impression de redessiner le curseur

[androz]

Tu trace ton curseur sur la Form du dessus et tu deplace cette Form, ca donne l'impression de redessiner le curseur

Ok ouais je comprends mieux... c'est astucieux, seulement ce petit problème de curseur n'était qu'un interlude pour débroussailler un projet plus complexe un peu. Je m'en suis sorti autrement fort heureusement.

En fait le but ultime était le suivant :
J'ai un fichier texte dans lequel j'ai les coordonnées des points de trois fonctions, par exemple des sinusoïdes qui évoluent dans le temps. Ces trois fonctions sont bornées et normalisées. Je voulais tracer sur un graphique les trois fonction et une ligne/curseur vertical qui se déplace le long des courbes, on vient alors balayer les courbes. Ce problème a été résolu en utilisant un TeeChart dont les Series des fonctions sont affichées une fois, et la Serie de la ligne verticale est actualisée à chaque step de temps.
En parallèle, je voulais afficher des genres de jauges (des progressBar quoi) pour chaque courbe où on pourrait voir qu'une jauge se remplie lorsque la fonction approche de 1 et se vide lorsqu'elle se rapproche de 0. Bref, deux représentations, l'une statique (les courbes) et l'autre dynamique (les jauges).

Pour les jauges, je voulais dessiner des rectangle que j'allais actualiser à chaque step de temps, mais comme les fonctions sont oscillantes je ne pouvais pas redessiner simplement par-dessus. Finalement avec tout simplement des ProgressBar ça fait l'affaire !!! J'avais utilisé des rectangles avec Matlab, mais là y'a encore plus simple.

Merci encore pour les réponses !