Discussion :

[Stevens.Georges]

Bonjour à tous,

Je suis sous Delphi4 standard et Windows XP.

Lorsque je déplace un Label au moyen d’un glisser-déplacer et que ce Label passe au dessus d’un StringGrid il devient invisible. Je suppose que cela tient au fait qu’il passe en dessous du StringGrid, c’est à dire en arrière-plan. Est-il possible de le faire passer en avant-plan pour qu’il reste visible au dessus du StringGrid comme si c’était un curseur ?

Merci d’avance à qui pourra éclairer ma lanterne.

[mick605]

Salut

Pour cela, il faut que tu changes le Parent de ton Label. Ainsi, quand tu veux afficher ton Label sur ton StringGrid, tu fais :

Code :

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

Label1.Parent:=StringGrid1;

Attention, il faut ensuite que tu exprimes tes coordonnées de ton label dans le repere de ta Grille. Ainsi, le point (0,0) est le point en haut a gauche de la grille, et non de la fiche.

Utilise les fonctions :

Code :

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

1
2
  StringGrid1.ClientToParent();
  StringGrid1.ParentToClient();

pour convertir tes coordonnées.

Bonne chance