Contenu | Rechercher | Menus

Annonce

Si vous avez des soucis pour rester connecté, déconnectez-vous puis reconnectez-vous depuis ce lien en cochant la case
Me connecter automatiquement lors de mes prochaines visites.

À propos de l'équipe du forum.

#1 Le 16/03/2013, à 17:05

netsabes

lazarus 1.0.6 gérer dynamiquement le z-order

Bonjour,

je souhaite qu'un TShape (barres[1]) soit affiché au dessus d'un TStringGrid (SG1).
J'ai mis ce code :

barres[1]:=TShape.Create(form1);
    barres[1].parent:=form1;
    SG1.SendToBack;
    barres[1].BringToFront;
    barres[1].Color:=clred;
    barres[1].visible:=true;
    barres[1].width:=5;
    barres[1].height:=24*(length(edit1.caption)-1)-12;
    barres[1].top:=30;
    barres[1].left:=40;   

Or je vois bien le Tshape, mais il est en dessous du TStringGrid.

Comment se fait-ce ? (de rat ;-)

Merci pour vos réponses.

Sébastien.


Cet Univers ne serait pas grand-chose s’il n’abritait pas les gens qu’on aime. (Stephen Hawking)
Linux Ubuntu 22.04 Gnome (64 bits)

Hors ligne

#2 Le 20/03/2013, à 15:06

delphives

Re : lazarus 1.0.6 gérer dynamiquement le z-order

bonjour,

si vous essayez en mettant

barres[1].BringToFront;

tout à la fin ou après le visible := true;


LINUX A UN NOYAU, APPLE A UN PEPIN...
*******************************************************
INTEL I7 860 @ 3.6 GHz - 4 x 3GB DDR3-1333 - Asus P7P55D - SSD OCZ Vertex II 120 Go - 2X WD Green Caviar 1 To - NVIDIA GTX 480 - UBUNTU 12.10 (64 bits)

Hors ligne

#3 Le 20/03/2013, à 15:29

netsabes

Re : lazarus 1.0.6 gérer dynamiquement le z-order

Merci,

je viens d'essayer. J'ai du coup essayé de changer l'ordre entre BringToFront et SendToBack, mais rien n'y fait, ma barre reste désespérément à l'arrière plan.


Cet Univers ne serait pas grand-chose s’il n’abritait pas les gens qu’on aime. (Stephen Hawking)
Linux Ubuntu 22.04 Gnome (64 bits)

Hors ligne