J'ai besoin, au terme d'un procédure, d'ouvrir un form en laissant le
pointeur en haut et à gauche de l'écran. Y'a t'il un moyen simple ?
Merci d'avance...
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
Raymond [mvp]
Bonsoir. pour se positionner dans le coin de l'écran, tu peux utiliser l'api SetCursorPos.
dans ton formulaire tu places, en déclaratives, : Private Declare Function SetCursorPos Lib "user32" ( _ ByVal x As Long, ByVal y As Long) As Long
dans ton code tu places: Call SetCursorPos(0, 0)
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Stéphane Brille" a écrit dans le message de news:c5h94g$765$
Bonjour,
J'ai besoin, au terme d'un procédure, d'ouvrir un form en laissant le pointeur en haut et à gauche de l'écran. Y'a t'il un moyen simple ? Merci d'avance...
-- Cordialement,
Stéphane Brille www.microbloc.com
Bonsoir.
pour se positionner dans le coin de l'écran, tu peux utiliser l'api
SetCursorPos.
dans ton formulaire tu places, en déclaratives, :
Private Declare Function SetCursorPos Lib "user32" ( _
ByVal x As Long, ByVal y As Long) As Long
dans ton code tu places:
Call SetCursorPos(0, 0)
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Stéphane Brille" <sbrille@NoSpam.microbloc.com> a écrit dans le message de
news:c5h94g$765$1@news-reader2.wanadoo.fr...
Bonjour,
J'ai besoin, au terme d'un procédure, d'ouvrir un form en laissant le
pointeur en haut et à gauche de l'écran. Y'a t'il un moyen simple ?
Merci d'avance...
Bonsoir. pour se positionner dans le coin de l'écran, tu peux utiliser l'api SetCursorPos.
dans ton formulaire tu places, en déclaratives, : Private Declare Function SetCursorPos Lib "user32" ( _ ByVal x As Long, ByVal y As Long) As Long
dans ton code tu places: Call SetCursorPos(0, 0)
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Stéphane Brille" a écrit dans le message de news:c5h94g$765$
Bonjour,
J'ai besoin, au terme d'un procédure, d'ouvrir un form en laissant le pointeur en haut et à gauche de l'écran. Y'a t'il un moyen simple ? Merci d'avance...
-- Cordialement,
Stéphane Brille www.microbloc.com
Stéphane Brille
Merci, Raymond, toujours trop fort ! ça marche du tonnerre, puis-je abuser avec un truc qui n'a rien à voir : je cherche à traduire la propriété couleur texte : 13382451 en équivalent rgb pour l'appliquer avec me.forecolor = rgb(x, y, z). Encore merci !
-- Cordialement,
Stéphane Brille www.microbloc.com
"Raymond [mvp]" a écrit dans le message de news: eCjU#
Bonsoir. pour se positionner dans le coin de l'écran, tu peux utiliser l'api SetCursorPos.
dans ton formulaire tu places, en déclaratives, : Private Declare Function SetCursorPos Lib "user32" ( _ ByVal x As Long, ByVal y As Long) As Long
dans ton code tu places: Call SetCursorPos(0, 0)
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Stéphane Brille" a écrit dans le message de
news:c5h94g$765$
Bonjour,
J'ai besoin, au terme d'un procédure, d'ouvrir un form en laissant le pointeur en haut et à gauche de l'écran. Y'a t'il un moyen simple ? Merci d'avance...
-- Cordialement,
Stéphane Brille www.microbloc.com
Merci,
Raymond, toujours trop fort !
ça marche du tonnerre, puis-je abuser avec un truc qui n'a rien à voir : je
cherche à traduire la propriété couleur texte : 13382451 en équivalent rgb
pour l'appliquer avec me.forecolor = rgb(x, y, z).
Encore merci !
--
Cordialement,
Stéphane Brille
www.microbloc.com
"Raymond [mvp]" <XYZ.access.seneque@free.fr> a écrit dans le message de
news: eCjU#JYIEHA.3832@TK2MSFTNGP12.phx.gbl...
Bonsoir.
pour se positionner dans le coin de l'écran, tu peux utiliser l'api
SetCursorPos.
dans ton formulaire tu places, en déclaratives, :
Private Declare Function SetCursorPos Lib "user32" ( _
ByVal x As Long, ByVal y As Long) As Long
dans ton code tu places:
Call SetCursorPos(0, 0)
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Stéphane Brille" <sbrille@NoSpam.microbloc.com> a écrit dans le message
de
news:c5h94g$765$1@news-reader2.wanadoo.fr...
Bonjour,
J'ai besoin, au terme d'un procédure, d'ouvrir un form en laissant le
pointeur en haut et à gauche de l'écran. Y'a t'il un moyen simple ?
Merci d'avance...
Merci, Raymond, toujours trop fort ! ça marche du tonnerre, puis-je abuser avec un truc qui n'a rien à voir : je cherche à traduire la propriété couleur texte : 13382451 en équivalent rgb pour l'appliquer avec me.forecolor = rgb(x, y, z). Encore merci !
-- Cordialement,
Stéphane Brille www.microbloc.com
"Raymond [mvp]" a écrit dans le message de news: eCjU#
Bonsoir. pour se positionner dans le coin de l'écran, tu peux utiliser l'api SetCursorPos.
dans ton formulaire tu places, en déclaratives, : Private Declare Function SetCursorPos Lib "user32" ( _ ByVal x As Long, ByVal y As Long) As Long
dans ton code tu places: Call SetCursorPos(0, 0)
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Stéphane Brille" a écrit dans le message de
news:c5h94g$765$
Bonjour,
J'ai besoin, au terme d'un procédure, d'ouvrir un form en laissant le pointeur en haut et à gauche de l'écran. Y'a t'il un moyen simple ? Merci d'avance...
-- Cordialement,
Stéphane Brille www.microbloc.com
3stone
Salut,
"Stéphane Brille"
cherche à traduire la propriété couleur texte : 13382451 en équivalent rgb pour l'appliquer avec me.forecolor = rgb(x, y, z).
51, 51, 204 ...comment trouver ?
Simple! Dans un formulaire, comme couleur de fond, tu saisi ta valeur. Ensuite, dans les propriétés, dans la ligne "Couleur de fond" un clic sur les 3 points [...] ouvre le sélecteur de couleur, avec un bouton... "Définir les couleurs personnalisées..."
... miracle, on t'indique les valeurs RGB ;-))
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
Salut,
"Stéphane Brille"
cherche à traduire la propriété couleur texte : 13382451 en équivalent rgb
pour l'appliquer avec me.forecolor = rgb(x, y, z).
51, 51, 204 ...comment trouver ?
Simple!
Dans un formulaire, comme couleur de fond, tu saisi ta valeur.
Ensuite, dans les propriétés, dans la ligne "Couleur de fond" un clic
sur les 3 points [...] ouvre le sélecteur de couleur, avec un bouton...
"Définir les couleurs personnalisées..."
... miracle, on t'indique les valeurs RGB ;-))
--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------
cherche à traduire la propriété couleur texte : 13382451 en équivalent rgb pour l'appliquer avec me.forecolor = rgb(x, y, z).
51, 51, 204 ...comment trouver ?
Simple! Dans un formulaire, comme couleur de fond, tu saisi ta valeur. Ensuite, dans les propriétés, dans la ligne "Couleur de fond" un clic sur les 3 points [...] ouvre le sélecteur de couleur, avec un bouton... "Définir les couleurs personnalisées..."
... miracle, on t'indique les valeurs RGB ;-))
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
Stéphane Brille
Merci, 2 miracles le même soir, c'est trop ! Je vais au lit en espérer un troisième, mais maman semble fatiguée ! Encore merci à vous...
-- Cordialement,
Stéphane Brille www.microbloc.com
"3stone" a écrit dans le message de news:
Salut,
"Stéphane Brille"
cherche à traduire la propriété couleur texte : 13382451 en équivalent rgb
pour l'appliquer avec me.forecolor = rgb(x, y, z).
51, 51, 204 ...comment trouver ?
Simple! Dans un formulaire, comme couleur de fond, tu saisi ta valeur. Ensuite, dans les propriétés, dans la ligne "Couleur de fond" un clic sur les 3 points [...] ouvre le sélecteur de couleur, avec un bouton... "Définir les couleurs personnalisées..."
... miracle, on t'indique les valeurs RGB ;-))
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
Merci,
2 miracles le même soir, c'est trop ! Je vais au lit en espérer un
troisième, mais maman semble fatiguée !
Encore merci à vous...
--
Cordialement,
Stéphane Brille
www.microbloc.com
"3stone" <threestone@cielreseau.be> a écrit dans le message de news:
e4dd7JaIEHA.2480@tk2msftngp13.phx.gbl...
Salut,
"Stéphane Brille"
cherche à traduire la propriété couleur texte : 13382451 en équivalent
rgb
pour l'appliquer avec me.forecolor = rgb(x, y, z).
51, 51, 204 ...comment trouver ?
Simple!
Dans un formulaire, comme couleur de fond, tu saisi ta valeur.
Ensuite, dans les propriétés, dans la ligne "Couleur de fond" un clic
sur les 3 points [...] ouvre le sélecteur de couleur, avec un bouton...
"Définir les couleurs personnalisées..."
... miracle, on t'indique les valeurs RGB ;-))
--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------
Merci, 2 miracles le même soir, c'est trop ! Je vais au lit en espérer un troisième, mais maman semble fatiguée ! Encore merci à vous...
-- Cordialement,
Stéphane Brille www.microbloc.com
"3stone" a écrit dans le message de news:
Salut,
"Stéphane Brille"
cherche à traduire la propriété couleur texte : 13382451 en équivalent rgb
pour l'appliquer avec me.forecolor = rgb(x, y, z).
51, 51, 204 ...comment trouver ?
Simple! Dans un formulaire, comme couleur de fond, tu saisi ta valeur. Ensuite, dans les propriétés, dans la ligne "Couleur de fond" un clic sur les 3 points [...] ouvre le sélecteur de couleur, avec un bouton... "Définir les couleurs personnalisées..."
... miracle, on t'indique les valeurs RGB ;-))
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
Raymond [mvp]
Bonjour Stéphane.
si tu veux faire des calculs sur les couleurs, récupérer les couleurs en RGB par exemple, il existe des fonctions simples (?): récupérer les rgb d'un controle d'un formulaire chargé bRouge = (Forms(Me.Modifiable0).Controls(Me.Liste2).BackColor And &HFF) bVert = (Forms(Me.Modifiable0).Controls(Me.Liste2).BackColor &H100) And &HFF bBleu = (Forms(Me.Modifiable0).Controls(Me.Liste2).BackColor &H10000) And &HFF fRouge = (Forms(Me.Modifiable0).Controls(Me.Liste2).ForeColor And &HFF) fVert = (Forms(Me.Modifiable0).Controls(Me.Liste2).ForeColor &H100) And &HFF fBleu = (Forms(Me.Modifiable0).Controls(Me.Liste2).ForeColor &H10000) And &HFF
si tu veux toutes les fonctions tu importes ma base exemple sur la page : http://access.seneque.free.fr/bases_exemples.htm N° 25
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Stéphane Brille" a écrit dans le message de news:c5hqk0$u0u$
Merci, 2 miracles le même soir, c'est trop ! Je vais au lit en espérer un troisième, mais maman semble fatiguée ! Encore merci à vous...
Bonjour Stéphane.
si tu veux faire des calculs sur les couleurs, récupérer les couleurs en RGB
par exemple, il existe des fonctions simples (?):
récupérer les rgb d'un controle d'un formulaire chargé
bRouge = (Forms(Me.Modifiable0).Controls(Me.Liste2).BackColor And &HFF)
bVert = (Forms(Me.Modifiable0).Controls(Me.Liste2).BackColor &H100)
And &HFF
bBleu = (Forms(Me.Modifiable0).Controls(Me.Liste2).BackColor &H10000)
And &HFF
fRouge = (Forms(Me.Modifiable0).Controls(Me.Liste2).ForeColor And &HFF)
fVert = (Forms(Me.Modifiable0).Controls(Me.Liste2).ForeColor &H100)
And &HFF
fBleu = (Forms(Me.Modifiable0).Controls(Me.Liste2).ForeColor &H10000)
And &HFF
si tu veux toutes les fonctions tu importes ma base exemple sur la page :
http://access.seneque.free.fr/bases_exemples.htm N° 25
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Stéphane Brille" <sbrille@NoSpam.microbloc.com> a écrit dans le message de
news:c5hqk0$u0u$1@news-reader4.wanadoo.fr...
Merci,
2 miracles le même soir, c'est trop ! Je vais au lit en espérer un
troisième, mais maman semble fatiguée !
Encore merci à vous...
si tu veux faire des calculs sur les couleurs, récupérer les couleurs en RGB par exemple, il existe des fonctions simples (?): récupérer les rgb d'un controle d'un formulaire chargé bRouge = (Forms(Me.Modifiable0).Controls(Me.Liste2).BackColor And &HFF) bVert = (Forms(Me.Modifiable0).Controls(Me.Liste2).BackColor &H100) And &HFF bBleu = (Forms(Me.Modifiable0).Controls(Me.Liste2).BackColor &H10000) And &HFF fRouge = (Forms(Me.Modifiable0).Controls(Me.Liste2).ForeColor And &HFF) fVert = (Forms(Me.Modifiable0).Controls(Me.Liste2).ForeColor &H100) And &HFF fBleu = (Forms(Me.Modifiable0).Controls(Me.Liste2).ForeColor &H10000) And &HFF
si tu veux toutes les fonctions tu importes ma base exemple sur la page : http://access.seneque.free.fr/bases_exemples.htm N° 25
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Stéphane Brille" a écrit dans le message de news:c5hqk0$u0u$
Merci, 2 miracles le même soir, c'est trop ! Je vais au lit en espérer un troisième, mais maman semble fatiguée ! Encore merci à vous...