blackcatthc
Messages postés86Date d'inscriptionjeudi 4 mars 2004StatutMembreDernière intervention 1 avril 2015
-
22 déc. 2006 à 16:42
blackcatthc
Messages postés86Date d'inscriptionjeudi 4 mars 2004StatutMembreDernière intervention 1 avril 2015
-
22 déc. 2006 à 19:03
Slt
voila je ne trouve pas comment faire pour que des composants text, commande, ou label soit prioritaire par rapport a un autre composant du même genre, pour être plus claire je voudrais que certain composants apparaissent par dessus d'autre et n'on pas en dessous.
sinon autre chose dans mon programme je fait un genre de commende qui apparait en glissant lorsque qu'on passe la souris sur une certain zone exemple:
Private Sub text1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
For n = 0 To 3000
picture1.Top = picture1.Top - 1
Next n
End Sub
le composant text1 est caché sous le composant picture1. donc avec c'est ligne de commande je le fait glisser au dessus du composant text1.
le problème est que tant que tant que le deplacement n'est pas terminer le composant text1 est tout gris et aprés seulement il apparairait vraiment complet . peut on faire en sorte que lors du deplacement du composant on apercoive deja le composant du dessous completenent
A voir également:
Probleme de priorité sur des composant label ou text
Dans le menu Format, Plan, tu peux géré l'order des plan. Se fait aussi avec la basse d'outils 'Editeur de code feuille"
Pour ton déplacement, je dirrais, ajoute un DoEvents pour laisser rafréchire.
jmfmarques
Messages postés7666Date d'inscriptionsamedi 5 novembre 2005StatutMembreDernière intervention22 août 201427 22 déc. 2006 à 17:10
Explique ce que tu as écrit là (corrige au besoin, s'il te plait) :
"le composant text1 est caché sous le composant picture1. donc avec c'est ligne de commande je le fait glisser au dessus du composant text1."
1) faire glisser text1 pour le faire passer au dessus de text1 (!) me parait étrange !!!!
2) comment peux-tu donc appliquer un Mouse_Move à text1 dont tu dis qu'il est caché sous Picture1 (bizarre... bizarre)
3) le code que tu as mis plus haut ne déplace pas text1 mais Picture1 (!)... en en plus la déplace 3000 fois de 1 pixel ! (pourquoi pas, alors, de 3000 pixels d'un coup ?)
Tout celà parait pour le moins fort étrange !
tout celà serait d'ailleurs complétement inutile en te servant de zorder !
Vous n’avez pas trouvé la réponse que vous recherchez ?
blackcatthc
Messages postés86Date d'inscriptionjeudi 4 mars 2004StatutMembreDernière intervention 1 avril 2015 22 déc. 2006 à 17:26
loool désolé j'aurrai du relire avant d'envoyer j'ai ecrit n'importe quoi
je corrige:
Private Sub commende1_click()
For n = 0 To 3000
picture1.Top = picture1.Top - 1
Next n
End Sub
le
composant text1 est caché sous le composant picture1. donc avec c'est
ligne de commande des que je click. Je le fait glisser au dessus du composant text1.
e problème est que tant que tant que le deplacement n'est pas terminer
le composant text1 est tout gris et aprés seulement il apparairait
vraiment complet . peut on faire en sorte que lors du deplacement du
composant on apercoive deja le composant du dessous completenent
Sinon merci pour le premiere réponse cela va m'être d'une grand aide
jmfmarques
Messages postés7666Date d'inscriptionsamedi 5 novembre 2005StatutMembreDernière intervention22 août 201427 22 déc. 2006 à 17:26
Et en plus de tout ce qui est dit plus haut :
En imaginant que tu puisses "accrocher" un bout visible de text1 pour faire bouger Picture1
Comme tu le fais dans son mouse_move et que ta souris ne cessera d'y bouger (à moins que tu ne fasses de la magie), ce ne sera pas 3000 fois mais un nombre infini de fois, tant que ta souris n'en sera pas sortie (de boucle en boucle, ma foi )
donc 1, 2 et 3 sont des composants commandes et 4, 5, 6 ,7 sont des picturesbox.
le truc que je veut faire c'est que quand je click sur la commande 1 les picturebox 6 et 7 se deplace vers le haut et cache les picturebox 4 et 5 laissant appararaitre les picturebox 8 et 9 qui sont dessous
donc la pas de probleme j'arrive a faire tous ca. Mais c'est juste que lors du deplacement les picturebox 8 et 9 sont toute grise on ne voit l'image apparraitre qu'une fois le deplacement des picturebox 6 et 7 terminé
jmfmarques
Messages postés7666Date d'inscriptionsamedi 5 novembre 2005StatutMembreDernière intervention22 août 201427 22 déc. 2006 à 17:52
Alors :
1) on va appeler les choses par leur ,om, si tu veux bien.
ce ne sont pas des composants mais des contrôles. (au fait : tiens, il n'y a pas de textboxes !...
2) mets ici un zip afin que je n'aie pas à bâtir tout ton projet
si tu fais vite, tu auras ta réponse en moins de 10 minutes...
Gaffe ! dans une heure je dois sortir de chez moi... alors dépêche toi
blackcatthc
Messages postés86Date d'inscriptionjeudi 4 mars 2004StatutMembreDernière intervention 1 avril 2015 22 déc. 2006 à 17:52
merci la avec le Me.Refresh ca fonctionne nickel mais ca a ajouté un nouveau probleme j'ai composant image sur la même fenetre du coup elle ce met a clignoté et j'peut pas remplacé ce composant image par un picurebox vu qu'il n'y a pas l'option strech
blackcatthc
Messages postés86Date d'inscriptionjeudi 4 mars 2004StatutMembreDernière intervention 1 avril 2015 22 déc. 2006 à 17:56
comment on fait sinon pour mettre un zip sur le site je te le met juste apres puis si on a pas le temp pour terminer ca ce soir on finira plus tard pas de problème
blackcatthc
Messages postés86Date d'inscriptionjeudi 4 mars 2004StatutMembreDernière intervention 1 avril 2015 22 déc. 2006 à 18:27
oui ca ca marche mais bon rajoute un controle image avec une image sur le même form dans un coin ou il y a rien et tu va voir quand tu click les iconne monte fluidement et le rafraichissement est bon mais au niveau du controle image ca fait dégeu
blackcatthc
Messages postés86Date d'inscriptionjeudi 4 mars 2004StatutMembreDernière intervention 1 avril 2015 22 déc. 2006 à 18:29
l'image scintille grave donc maintenant le coup de icones avec le refresh niquel mais j'me retrouve avec un autre probleme lool sinon j'pourrait remplace mon controle image par un picturebox si tu c'est comment faire un strech dedans
blackcatthc
Messages postés86Date d'inscriptionjeudi 4 mars 2004StatutMembreDernière intervention 1 avril 2015 22 déc. 2006 à 18:44
tu va m'en vouloir mais toujours un probleme. donc voila j'ai rajouté un boucle pour que tu vois que quand tu click plusieur fois sur commende1 pour que frame2 finisse par lui passé dessus et etre plus haut que la commende1 tu va voir que la commande est caché et elle apparait une fois le deplacement terminé
tu va voir avec la boucle pour ralentir ca flagrant
Private Sub Command1_Click()
For n = 0 To Frame2.Height
for a = 0 to 200000
next a
Frame2.Top = Frame2.Top - 1
Frame2.Refresh
Frame3.Refresh
Next n
End Sub
Private Sub Form_Activate()
Frame2.Move Frame1.Left, Frame1.Top + Frame1.Height, Frame1.Width
Frame3.Move Frame1.Left, Frame1.Top + Frame1.Height, Frame1.Width
Frame1.ZOrder
Frame2.ZOrder
End Sub