Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
François Fuchs
mer. 14 sept. 2005 15:54:42 waikup a écrit dans le message de news <news:dg9a2v$cm8$ :
ya pas une solution pour referencé le control bouton du style [this] ou autre pour avoir un code qui ressemble à :
Private Sub btnAgtCommis_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) this.ForeColor = Rouge End Sub
C'est très chiant, oui. Il manque les «collections» dans VBA. J'utilise un subterfuge.
Il s'agit de recouvrir un ensemble de zones images par un label transparent qui me servira se spot.
Je gère le clic et le déplacement en récupérant les coordonées X et Y du curseur, ce qui permet me calculer l'indice de l'image et ainsi d'agir sur les images en dessous (effet enfoncé, effet relâché) ainsi que de sélectionner une action dans un select case.
Cette méthode permet de créer des boutons totalement personnalisés, changeant un peu de ces horribles rectangles gris qui nous rendent les yeux carrés.
J'ai un exemple en A97 avec des boutons martiens, si tu veux. J'avais fait un démineur aussi, à l'aide des seules fonctions événementielles d'un seul contrôle.
-- Quand Jimmy dit what'd I say I love you baby C'est comme qui dirait Toute la province qui chante en anglais
mer. 14 sept. 2005 15:54:42 waikup a écrit dans le message de news
<news:dg9a2v$cm8$1@s1.news.oleane.net> :
ya pas une solution pour referencé le control bouton du style [this] ou
autre pour avoir un code qui ressemble à :
Private Sub btnAgtCommis_MouseMove(Button As Integer, Shift As Integer,
X As Single, Y As Single)
this.ForeColor = Rouge
End Sub
C'est très chiant, oui. Il manque les «collections» dans VBA. J'utilise un
subterfuge.
Il s'agit de recouvrir un ensemble de zones images par un label transparent
qui me servira se spot.
Je gère le clic et le déplacement en récupérant les coordonées X et Y du
curseur, ce qui permet me calculer l'indice de l'image et ainsi d'agir sur
les images en dessous (effet enfoncé, effet relâché) ainsi que de
sélectionner une action dans un select case.
Cette méthode permet de créer des boutons totalement personnalisés, changeant
un peu de ces horribles rectangles gris qui nous rendent les yeux carrés.
J'ai un exemple en A97 avec des boutons martiens, si tu veux. J'avais fait un
démineur aussi, à l'aide des seules fonctions événementielles d'un seul
contrôle.
--
Quand Jimmy dit what'd I say
I love you baby
C'est comme qui dirait
Toute la province qui chante en anglais
mer. 14 sept. 2005 15:54:42 waikup a écrit dans le message de news <news:dg9a2v$cm8$ :
ya pas une solution pour referencé le control bouton du style [this] ou autre pour avoir un code qui ressemble à :
Private Sub btnAgtCommis_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) this.ForeColor = Rouge End Sub
C'est très chiant, oui. Il manque les «collections» dans VBA. J'utilise un subterfuge.
Il s'agit de recouvrir un ensemble de zones images par un label transparent qui me servira se spot.
Je gère le clic et le déplacement en récupérant les coordonées X et Y du curseur, ce qui permet me calculer l'indice de l'image et ainsi d'agir sur les images en dessous (effet enfoncé, effet relâché) ainsi que de sélectionner une action dans un select case.
Cette méthode permet de créer des boutons totalement personnalisés, changeant un peu de ces horribles rectangles gris qui nous rendent les yeux carrés.
J'ai un exemple en A97 avec des boutons martiens, si tu veux. J'avais fait un démineur aussi, à l'aide des seules fonctions événementielles d'un seul contrôle.
-- Quand Jimmy dit what'd I say I love you baby C'est comme qui dirait Toute la province qui chante en anglais
waikup
merci pour ta reponse, ouai mais avec cette methode, il faut que tu parcours tous les boutons du forme pour connaitre celui qui est sous le curseur ?? ou ya moyen de l'avoir plus vite.
(c'est vrai qu'au niveau choix des boutons, on est pas beaucoup aidé /:) )
"François Fuchs" a écrit dans le message de news:
mer. 14 sept. 2005 15:54:42 waikup a écrit dans le message de news <news:dg9a2v$cm8$ :
ya pas une solution pour referencé le control bouton du style [this] ou autre pour avoir un code qui ressemble à :
Private Sub btnAgtCommis_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) this.ForeColor = Rouge End Sub
C'est très chiant, oui. Il manque les «collections» dans VBA. J'utilise un subterfuge.
Il s'agit de recouvrir un ensemble de zones images par un label transparent qui me servira se spot.
Je gère le clic et le déplacement en récupérant les coordonées X et Y du curseur, ce qui permet me calculer l'indice de l'image et ainsi d'agir sur les images en dessous (effet enfoncé, effet relâché) ainsi que de sélectionner une action dans un select case.
Cette méthode permet de créer des boutons totalement personnalisés, changeant un peu de ces horribles rectangles gris qui nous rendent les yeux carrés.
J'ai un exemple en A97 avec des boutons martiens, si tu veux. J'avais fait un démineur aussi, à l'aide des seules fonctions événementielles d'un seul contrôle.
-- Quand Jimmy dit what'd I say I love you baby C'est comme qui dirait Toute la province qui chante en anglais
merci pour ta reponse,
ouai mais avec cette methode, il faut que tu parcours tous les boutons du
forme pour connaitre celui qui est sous le curseur ??
ou ya moyen de l'avoir plus vite.
(c'est vrai qu'au niveau choix des boutons, on est pas beaucoup aidé /:) )
"François Fuchs" <E7@dtc.invalid> a écrit dans le message de news:
Xns96D1A5DC01C54TotoLeHaricot@217.24.82.4...
mer. 14 sept. 2005 15:54:42 waikup a écrit dans le message de news
<news:dg9a2v$cm8$1@s1.news.oleane.net> :
ya pas une solution pour referencé le control bouton du style [this] ou
autre pour avoir un code qui ressemble à :
Private Sub btnAgtCommis_MouseMove(Button As Integer, Shift As Integer,
X As Single, Y As Single)
this.ForeColor = Rouge
End Sub
C'est très chiant, oui. Il manque les «collections» dans VBA. J'utilise un
subterfuge.
Il s'agit de recouvrir un ensemble de zones images par un label
transparent
qui me servira se spot.
Je gère le clic et le déplacement en récupérant les coordonées X et Y du
curseur, ce qui permet me calculer l'indice de l'image et ainsi d'agir sur
les images en dessous (effet enfoncé, effet relâché) ainsi que de
sélectionner une action dans un select case.
Cette méthode permet de créer des boutons totalement personnalisés,
changeant
un peu de ces horribles rectangles gris qui nous rendent les yeux carrés.
J'ai un exemple en A97 avec des boutons martiens, si tu veux. J'avais fait
un
démineur aussi, à l'aide des seules fonctions événementielles d'un seul
contrôle.
--
Quand Jimmy dit what'd I say
I love you baby
C'est comme qui dirait
Toute la province qui chante en anglais
merci pour ta reponse, ouai mais avec cette methode, il faut que tu parcours tous les boutons du forme pour connaitre celui qui est sous le curseur ?? ou ya moyen de l'avoir plus vite.
(c'est vrai qu'au niveau choix des boutons, on est pas beaucoup aidé /:) )
"François Fuchs" a écrit dans le message de news:
mer. 14 sept. 2005 15:54:42 waikup a écrit dans le message de news <news:dg9a2v$cm8$ :
ya pas une solution pour referencé le control bouton du style [this] ou autre pour avoir un code qui ressemble à :
Private Sub btnAgtCommis_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) this.ForeColor = Rouge End Sub
C'est très chiant, oui. Il manque les «collections» dans VBA. J'utilise un subterfuge.
Il s'agit de recouvrir un ensemble de zones images par un label transparent qui me servira se spot.
Je gère le clic et le déplacement en récupérant les coordonées X et Y du curseur, ce qui permet me calculer l'indice de l'image et ainsi d'agir sur les images en dessous (effet enfoncé, effet relâché) ainsi que de sélectionner une action dans un select case.
Cette méthode permet de créer des boutons totalement personnalisés, changeant un peu de ces horribles rectangles gris qui nous rendent les yeux carrés.
J'ai un exemple en A97 avec des boutons martiens, si tu veux. J'avais fait un démineur aussi, à l'aide des seules fonctions événementielles d'un seul contrôle.
-- Quand Jimmy dit what'd I say I love you baby C'est comme qui dirait Toute la province qui chante en anglais
