je souhaite faire un truc sous Vb Net mais je sais absolument pas comment
faire
je vais expliquer sa en detail
faire une application native c'est a dire une aplication qui tourne a
arriere plant (dans la barre des tache windows)
donc l'application est composer d'une zone de texte (textbox1) et d'un
bouton
je souhaite en cliquant sur le bouton l'application ce mettre dans la barre
des taches est surveille les clics de la souris pour les inscrire dans la
zone de texte exemple si je clic sur le bouton demarrer de windows dans ma
zone de texte il y est marquer Démarrer
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
Zoury
Salut TroXsa! :O)
je souhaite faire un truc sous Vb Net mais je sais absolument pas comment faire
<Mauvais groupe - réponse standard> Ce groupe est dédier à VB6 et à ses versions antérieurs. Pour obtenir de l'aide sur VB.NET ou tous autre produit .NET, pose tes questions dans les groupes contenant le terme "dotnet" ou "vsnet", tel que :
microsoft.public.fr.dotnet.vb </Mauvais groupe - réponse standard>
faire une application native c'est a dire une aplication qui tourne a arriere plant (dans la barre des tache windows) donc l'application est composer d'une zone de texte (textbox1) et d'un bouton je souhaite en cliquant sur le bouton l'application ce mettre dans la
barre
des taches est surveille les clics de la souris pour les inscrire dans la zone de texte exemple si je clic sur le bouton demarrer de windows dans ma zone de texte il y est marquer Démarrer
Regarde cette discussion : http://groups.google.com/groups?threadm=u2X0qDFJDHA.276%40tk2msftngp13.phx.gbl
Merci de poster les réponses au groupe afin d'en faire profiter à tous
Salut TroXsa! :O)
je souhaite faire un truc sous Vb Net mais je sais absolument pas comment
faire
<Mauvais groupe - réponse standard>
Ce groupe est dédier à VB6 et à ses versions antérieurs. Pour obtenir de
l'aide sur VB.NET ou tous autre produit .NET, pose tes questions dans
les groupes contenant le terme "dotnet" ou "vsnet", tel que :
microsoft.public.fr.dotnet.vb
</Mauvais groupe - réponse standard>
faire une application native c'est a dire une aplication qui tourne a
arriere plant (dans la barre des tache windows)
donc l'application est composer d'une zone de texte (textbox1) et d'un
bouton
je souhaite en cliquant sur le bouton l'application ce mettre dans la
barre
des taches est surveille les clics de la souris pour les inscrire dans la
zone de texte exemple si je clic sur le bouton demarrer de windows dans ma
zone de texte il y est marquer Démarrer
Regarde cette discussion :
http://groups.google.com/groups?threadm=u2X0qDFJDHA.276%40tk2msftngp13.phx.gbl
je souhaite faire un truc sous Vb Net mais je sais absolument pas comment faire
<Mauvais groupe - réponse standard> Ce groupe est dédier à VB6 et à ses versions antérieurs. Pour obtenir de l'aide sur VB.NET ou tous autre produit .NET, pose tes questions dans les groupes contenant le terme "dotnet" ou "vsnet", tel que :
microsoft.public.fr.dotnet.vb </Mauvais groupe - réponse standard>
faire une application native c'est a dire une aplication qui tourne a arriere plant (dans la barre des tache windows) donc l'application est composer d'une zone de texte (textbox1) et d'un bouton je souhaite en cliquant sur le bouton l'application ce mettre dans la
barre
des taches est surveille les clics de la souris pour les inscrire dans la zone de texte exemple si je clic sur le bouton demarrer de windows dans ma zone de texte il y est marquer Démarrer
Regarde cette discussion : http://groups.google.com/groups?threadm=u2X0qDFJDHA.276%40tk2msftngp13.phx.gbl
Merci de poster les réponses au groupe afin d'en faire profiter à tous
Nicolas
Voici une solution testée sous VB6 pour ceux que ça intéresse.
Créez un nouveau projet, déposer un composant ListBox de nom List1 dessus et coller le code suivant :
Private Declare Function GetCursorPos& Lib "user32" (lpPoint As PointApi) Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer
Private Type PointApi X As Long Y As Long End Type
Dim Etat(5) As Long
Private Sub Form_Load() For Bouton = 1 To 4 Etat(Bouton) = GetKeyState(Bouton) Next Bouton End Sub
Private Sub Timer1_Timer() Dim Point As PointApi For Bouton = 1 To 4 If GetKeyState(Bouton) <> Etat(Bouton) Then Etat(Bouton) = GetKeyState(Bouton) If Etat(Bouton) = 0 Or Etat(Bouton) = 1 Then GetCursorPos Point Select Case Bouton Case 1: Me.List1.AddItem "Bouton gauche, X = " & Point.X & " Y = " & Point.Y Case 2: Me.List1.AddItem "Bouton droit, X = " & Point.X & " Y = " & Point.Y Case 4: Me.List1.AddItem "Molette, X = " & Point.X & " Y = " & Point.Y End Select End If End If Next Bouton End Sub
Avec ceci, vous saurez quel bouton de la souris a été cliqué et à quelles coordonnées. Pour savoir si l'utilisateur a cliqué sur le bouton démarrer, il suffit juste de tester si le curseur se trouve dans la region délimitée par le bouton démarrer soit approximativement :
Voici une solution testée sous VB6 pour ceux que ça
intéresse.
Créez un nouveau projet, déposer un composant ListBox de
nom List1 dessus et coller le code suivant :
Private Declare Function GetCursorPos& Lib "user32"
(lpPoint As PointApi)
Private Declare Function GetKeyState Lib "user32" (ByVal
nVirtKey As Long) As Integer
Private Type PointApi
X As Long
Y As Long
End Type
Dim Etat(5) As Long
Private Sub Form_Load()
For Bouton = 1 To 4
Etat(Bouton) = GetKeyState(Bouton)
Next Bouton
End Sub
Private Sub Timer1_Timer()
Dim Point As PointApi
For Bouton = 1 To 4
If GetKeyState(Bouton) <> Etat(Bouton) Then
Etat(Bouton) = GetKeyState(Bouton)
If Etat(Bouton) = 0 Or Etat(Bouton) = 1 Then
GetCursorPos Point
Select Case Bouton
Case 1: Me.List1.AddItem "Bouton
gauche, X = " & Point.X & " Y = " & Point.Y
Case 2: Me.List1.AddItem "Bouton
droit, X = " & Point.X & " Y = " & Point.Y
Case 4: Me.List1.AddItem "Molette, X
= " & Point.X & " Y = " & Point.Y
End Select
End If
End If
Next Bouton
End Sub
Avec ceci, vous saurez quel bouton de la souris a été
cliqué et à quelles coordonnées. Pour savoir si
l'utilisateur a cliqué sur le bouton démarrer, il suffit
juste de tester si le curseur se trouve dans la region
délimitée par le bouton démarrer soit approximativement :
Voici une solution testée sous VB6 pour ceux que ça intéresse.
Créez un nouveau projet, déposer un composant ListBox de nom List1 dessus et coller le code suivant :
Private Declare Function GetCursorPos& Lib "user32" (lpPoint As PointApi) Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer
Private Type PointApi X As Long Y As Long End Type
Dim Etat(5) As Long
Private Sub Form_Load() For Bouton = 1 To 4 Etat(Bouton) = GetKeyState(Bouton) Next Bouton End Sub
Private Sub Timer1_Timer() Dim Point As PointApi For Bouton = 1 To 4 If GetKeyState(Bouton) <> Etat(Bouton) Then Etat(Bouton) = GetKeyState(Bouton) If Etat(Bouton) = 0 Or Etat(Bouton) = 1 Then GetCursorPos Point Select Case Bouton Case 1: Me.List1.AddItem "Bouton gauche, X = " & Point.X & " Y = " & Point.Y Case 2: Me.List1.AddItem "Bouton droit, X = " & Point.X & " Y = " & Point.Y Case 4: Me.List1.AddItem "Molette, X = " & Point.X & " Y = " & Point.Y End Select End If End If Next Bouton End Sub
Avec ceci, vous saurez quel bouton de la souris a été cliqué et à quelles coordonnées. Pour savoir si l'utilisateur a cliqué sur le bouton démarrer, il suffit juste de tester si le curseur se trouve dans la region délimitée par le bouton démarrer soit approximativement :
N'oubliez pas de rajouter un controle Timer sur votre formulaire avec Interval = 1 ;-)
Nicolas
TroXsA
Zoury dabort, merci d'avoir repondu
je savais plus ou moin que j'etait dans un NG pas dedier au .net je me suis dit tout simplement que si quel un connais la reponse sa serait cool
en bref pour te repondre sur le NG que tu ma indiqué ils y en a un qui ma plus ou moin envoyé "chier" c'est bien pour sa que je suis venu dans ce NG pour trouver une solution au probleme que je rencontre
merci quand meme
a bientot peut etre
bonne continuation sinon :-)
Cordialement
Zoury
dabort, merci d'avoir repondu
je savais plus ou moin que j'etait dans un NG pas dedier au .net
je me suis dit tout simplement que si quel un connais la reponse sa serait
cool
en bref pour te repondre sur le NG que tu ma indiqué ils y en a un qui ma
plus ou moin envoyé "chier"
c'est bien pour sa que je suis venu dans ce NG pour trouver une solution au
probleme que je rencontre
je savais plus ou moin que j'etait dans un NG pas dedier au .net je me suis dit tout simplement que si quel un connais la reponse sa serait cool
en bref pour te repondre sur le NG que tu ma indiqué ils y en a un qui ma plus ou moin envoyé "chier" c'est bien pour sa que je suis venu dans ce NG pour trouver une solution au probleme que je rencontre
merci quand meme
a bientot peut etre
bonne continuation sinon :-)
Cordialement
TroXsA
Nicolas
merci c'est super effectivement sa peut me mettre sur une vois je vais tester plusieurs choses avec ce que tu ma donner :)
sa va etre tres chaud mais bon qui tente rien n'a rien
a bientôt
Nicolas
merci c'est super effectivement sa peut me mettre sur une vois
je vais tester plusieurs choses avec ce que tu ma donner :)
sa va etre tres chaud mais bon qui tente rien n'a rien
> en bref pour te repondre sur le NG que tu ma indiqué ils y en a un qui ma plus ou moin envoyé "chier"
lol! Bismark n'est pas méchant.. un peu bougonneux c'est tout. ;O)
TroXsA
Oui je peut le comprendre il y a des jour avec des jour sans
bref, l'histoire de subclassing est pas mal en soit mais je sais toujours pas comment l'utiliser et pourtant je recherche aussi bien dans le MSDN que sur le net, mais je suis pas tres doué en langue etrangere :(
j'ai trouver effectivement des exemples de ce que je recherche mais c'est pour VB6 donc non complatible avec le net j'ai tester de faire les conversions en net ça fonctionne pas
mon probleme reste toujours d'actualité si quel un a une solution dans ce NG je suis preuneur
merci
"Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de news:OxQD%
> en bref pour te repondre sur le NG que tu ma indiqué ils y en a un qui
ma
> plus ou moin envoyé "chier"
lol! Bismark n'est pas méchant.. un peu bougonneux c'est tout. ;O)
Oui je peut le comprendre
il y a des jour avec des jour sans
bref, l'histoire de subclassing est pas mal en soit
mais je sais toujours pas comment l'utiliser
et pourtant je recherche aussi bien dans le MSDN que
sur le net, mais je suis pas tres doué en langue etrangere :(
j'ai trouver effectivement des exemples de ce que je recherche mais c'est
pour VB6 donc non complatible avec le net j'ai tester de faire les
conversions en net ça fonctionne pas
mon probleme reste toujours d'actualité si quel un a une solution dans ce NG
je suis preuneur
merci
"Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de
news:OxQD%23oJpDHA.3256@tk2msftngp13.phx.gbl...
> en bref pour te repondre sur le NG que tu ma indiqué ils y en a un qui
ma
> plus ou moin envoyé "chier"
lol! Bismark n'est pas méchant.. un peu bougonneux c'est tout. ;O)
Oui je peut le comprendre il y a des jour avec des jour sans
bref, l'histoire de subclassing est pas mal en soit mais je sais toujours pas comment l'utiliser et pourtant je recherche aussi bien dans le MSDN que sur le net, mais je suis pas tres doué en langue etrangere :(
j'ai trouver effectivement des exemples de ce que je recherche mais c'est pour VB6 donc non complatible avec le net j'ai tester de faire les conversions en net ça fonctionne pas
mon probleme reste toujours d'actualité si quel un a une solution dans ce NG je suis preuneur
merci
"Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de news:OxQD%
> en bref pour te repondre sur le NG que tu ma indiqué ils y en a un qui
ma
> plus ou moin envoyé "chier"
lol! Bismark n'est pas méchant.. un peu bougonneux c'est tout. ;O)
Bismark Prods
envoi moi ton exemple vb6 et je me ferais un plaisir de te le convertir en Vb.net
"TroXsA" a écrit dans le message de news:boe8tr$guh$
Oui je peut le comprendre il y a des jour avec des jour sans
bref, l'histoire de subclassing est pas mal en soit mais je sais toujours pas comment l'utiliser et pourtant je recherche aussi bien dans le MSDN que sur le net, mais je suis pas tres doué en langue etrangere :(
j'ai trouver effectivement des exemples de ce que je recherche mais c'est pour VB6 donc non complatible avec le net j'ai tester de faire les conversions en net ça fonctionne pas
mon probleme reste toujours d'actualité si quel un a une solution dans ce
NG
je suis preuneur
merci
"Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de news:OxQD% > > en bref pour te repondre sur le NG que tu ma indiqué ils y en a un qui ma > > plus ou moin envoyé "chier" > > lol! Bismark n'est pas méchant.. un peu bougonneux c'est tout. ;O) > >
envoi moi ton exemple vb6 et je me ferais un plaisir de te le convertir en
Vb.net
"TroXsA" <troxsa@yahoo.fr> a écrit dans le message de
news:boe8tr$guh$1@aphrodite.grec.isp.9tel.net...
Oui je peut le comprendre
il y a des jour avec des jour sans
bref, l'histoire de subclassing est pas mal en soit
mais je sais toujours pas comment l'utiliser
et pourtant je recherche aussi bien dans le MSDN que
sur le net, mais je suis pas tres doué en langue etrangere :(
j'ai trouver effectivement des exemples de ce que je recherche mais c'est
pour VB6 donc non complatible avec le net j'ai tester de faire les
conversions en net ça fonctionne pas
mon probleme reste toujours d'actualité si quel un a une solution dans ce
NG
je suis preuneur
merci
"Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de
news:OxQD%23oJpDHA.3256@tk2msftngp13.phx.gbl...
> > en bref pour te repondre sur le NG que tu ma indiqué ils y en a un qui
ma
> > plus ou moin envoyé "chier"
>
> lol! Bismark n'est pas méchant.. un peu bougonneux c'est tout. ;O)
>
>
envoi moi ton exemple vb6 et je me ferais un plaisir de te le convertir en Vb.net
"TroXsA" a écrit dans le message de news:boe8tr$guh$
Oui je peut le comprendre il y a des jour avec des jour sans
bref, l'histoire de subclassing est pas mal en soit mais je sais toujours pas comment l'utiliser et pourtant je recherche aussi bien dans le MSDN que sur le net, mais je suis pas tres doué en langue etrangere :(
j'ai trouver effectivement des exemples de ce que je recherche mais c'est pour VB6 donc non complatible avec le net j'ai tester de faire les conversions en net ça fonctionne pas
mon probleme reste toujours d'actualité si quel un a une solution dans ce
NG
je suis preuneur
merci
"Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de news:OxQD% > > en bref pour te repondre sur le NG que tu ma indiqué ils y en a un qui ma > > plus ou moin envoyé "chier" > > lol! Bismark n'est pas méchant.. un peu bougonneux c'est tout. ;O) > >
TroXsA
Houaaa !!! Genial
http://www.vbfrance.com/code.aspx?IDA18
Ben si tu y arrive chapo (c'est normale quand on connais pas tout de vb.net)
merci encore
"Bismark Prods" a écrit dans le message de news:ukfi%
envoi moi ton exemple vb6 et je me ferais un plaisir de te le convertir en Vb.net
"TroXsA" a écrit dans le message de news:boe8tr$guh$ > Oui je peut le comprendre > il y a des jour avec des jour sans > > bref, l'histoire de subclassing est pas mal en soit > mais je sais toujours pas comment l'utiliser > et pourtant je recherche aussi bien dans le MSDN que > sur le net, mais je suis pas tres doué en langue etrangere :( > > j'ai trouver effectivement des exemples de ce que je recherche mais
c'est
> pour VB6 donc non complatible avec le net j'ai tester de faire les > conversions en net ça fonctionne pas > > mon probleme reste toujours d'actualité si quel un a une solution dans
ce
NG > je suis preuneur > > > merci > > "Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de > news:OxQD% > > > en bref pour te repondre sur le NG que tu ma indiqué ils y en a un
qui
> ma > > > plus ou moin envoyé "chier" > > > > lol! Bismark n'est pas méchant.. un peu bougonneux c'est tout. ;O) > > > > > >
Houaaa !!! Genial
http://www.vbfrance.com/code.aspx?IDA18
Ben si tu y arrive chapo
(c'est normale quand on connais pas tout de vb.net)
merci encore
"Bismark Prods" <no_xanaia@urbanet.ch_spam> a écrit dans le message de
news:ukfi%23FKpDHA.2304@TK2MSFTNGP11.phx.gbl...
envoi moi ton exemple vb6 et je me ferais un plaisir de te le convertir en
Vb.net
"TroXsA" <troxsa@yahoo.fr> a écrit dans le message de
news:boe8tr$guh$1@aphrodite.grec.isp.9tel.net...
> Oui je peut le comprendre
> il y a des jour avec des jour sans
>
> bref, l'histoire de subclassing est pas mal en soit
> mais je sais toujours pas comment l'utiliser
> et pourtant je recherche aussi bien dans le MSDN que
> sur le net, mais je suis pas tres doué en langue etrangere :(
>
> j'ai trouver effectivement des exemples de ce que je recherche mais
c'est
> pour VB6 donc non complatible avec le net j'ai tester de faire les
> conversions en net ça fonctionne pas
>
> mon probleme reste toujours d'actualité si quel un a une solution dans
ce
NG
> je suis preuneur
>
>
> merci
>
> "Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de
> news:OxQD%23oJpDHA.3256@tk2msftngp13.phx.gbl...
> > > en bref pour te repondre sur le NG que tu ma indiqué ils y en a un
qui
> ma
> > > plus ou moin envoyé "chier"
> >
> > lol! Bismark n'est pas méchant.. un peu bougonneux c'est tout. ;O)
> >
> >
>
>
Ben si tu y arrive chapo (c'est normale quand on connais pas tout de vb.net)
merci encore
"Bismark Prods" a écrit dans le message de news:ukfi%
envoi moi ton exemple vb6 et je me ferais un plaisir de te le convertir en Vb.net
"TroXsA" a écrit dans le message de news:boe8tr$guh$ > Oui je peut le comprendre > il y a des jour avec des jour sans > > bref, l'histoire de subclassing est pas mal en soit > mais je sais toujours pas comment l'utiliser > et pourtant je recherche aussi bien dans le MSDN que > sur le net, mais je suis pas tres doué en langue etrangere :( > > j'ai trouver effectivement des exemples de ce que je recherche mais
c'est
> pour VB6 donc non complatible avec le net j'ai tester de faire les > conversions en net ça fonctionne pas > > mon probleme reste toujours d'actualité si quel un a une solution dans
ce
NG > je suis preuneur > > > merci > > "Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de > news:OxQD% > > > en bref pour te repondre sur le NG que tu ma indiqué ils y en a un
qui
> ma > > > plus ou moin envoyé "chier" > > > > lol! Bismark n'est pas méchant.. un peu bougonneux c'est tout. ;O) > > > > > >
