Problème de détection de charge du pc [Résolu]
ascder
Contributeur Dernière intervention
11 avril 2018
- 6 févr. 2012 à 07:41
- Messages postés
- 9
- Date d'inscription
- mercredi 25 novembre 2009
- Dernière intervention
- 30 juillet 2016
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
A voir également:
- Problème de détection de charge du pc
- Détecter @ip,@mac des pcs connectés au lan avec java? ✓ - Forum - Java
- Detecter les applications installées sur votre pc - Codes sources - Delphi / Pascal (Système)
- Delphi / Pascal : Détecter si le pc est connecté à un réseau - CodeS Sou - Guide
- Utilisation du port série et détection d'un modem rtc branché sur l'ordi - Codes sources - Visual Basic / VB.NET (Control)
- Charge batterie portable (ordinateur) - Codes sources - Visual Basic / VB.NET (Système)
10 réponses
Meilleure réponse
- Messages postés
- 540
- Date d'inscription
- mardi 4 août 2009
- Dernière intervention
- 1 février 2013
Bonsoir,
je sais pas si c'est très propre mais bon,ça marche et c'est déjà ça :
Bonne continuation!!
Ce qui compte,ce n'est pas ce qu'on a mais plutôt ce que l'on fait avec ce qu'on a...
Visual Basic .Net is the best
and vb6.0
je sais pas si c'est très propre mais bon,ça marche et c'est déjà ça :
Imports Microsoft.Win32
Public Class Form1
Dim psBattery As PowerStatus = SystemInformation.PowerStatus
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
verif()
AddHandler SystemEvents.PowerModeChanged, AddressOf verif
End Sub
Sub verif()
If psBattery.PowerLineStatus = PowerLineStatus.Online Then
Label1.Text = ("Battery charge status: Charging")
Console.Beep()
Label1.Refresh()
ElseIf psBattery.PowerLineStatus = PowerLineStatus.Offline Then
Label1.Text = ("Battery charge status: Not charging")
Console.Beep()
Label1.Refresh()
End If
End Sub
End Class
Bonne continuation!!
Ce qui compte,ce n'est pas ce qu'on a mais plutôt ce que l'on fait avec ce qu'on a...
Visual Basic .Net is the best
and vb6.0
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
a aidé 97 internautes ce mois-ci
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
Bonjour,
et dis-moi : tu ne cherches à contrôler qu'au chargement de ton Form ?
Tu m'étonnes alors, lorsque tu écris :
A moins que tu ne redémarres le chargement de ton Form, hein !
Question de logique et de prise de conscience de ce qu'est un évènement, avant toute autre "chose" !
____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
et dis-moi : tu ne cherches à contrôler qu'au chargement de ton Form ?
Tu m'étonnes alors, lorsque tu écris :
mais quand débranche le pc rien ne change dans le label1
A moins que tu ne redémarres le chargement de ton Form, hein !
Question de logique et de prise de conscience de ce qu'est un évènement, avant toute autre "chose" !
____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
Et : puisque nous parlons d'évènements : pourquoi ne t'intéresserais-u pas à celui-ci :
SystemEvents.PowerModeChanged
Je ne suis pas VB.Nettiste, mais je parierais volontiers qu'il permet de faire ce que permet le contrôle sysinfo de VB6
____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
SystemEvents.PowerModeChanged
Je ne suis pas VB.Nettiste, mais je parierais volontiers qu'il permet de faire ce que permet le contrôle sysinfo de VB6
____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
Un Timer pour celà ?
Déraisonnable !
N'allez pas me dire que VB.Net n'a pas d'évènement pour cela (probablement celui sur lequel j'ai appelé l'attention) alors que le control sysinfo de VB6 en a un !
____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
Déraisonnable !
N'allez pas me dire que VB.Net n'a pas d'évènement pour cela (probablement celui sur lequel j'ai appelé l'attention) alors que le control sysinfo de VB6 en a un !
____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
J'irais personnellement lire ceci :
Tapez le texte de l'url ici.
en n'oubliant pas cette importante indication :
____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
Tapez le texte de l'url ici.
en n'oubliant pas cette importante indication :
Just run HookEventsAdd during load and the HookEventsRemove during closing.
____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.