begin process at 2012 02 11 08:46:15
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Ecrans de veille

 > ECRAN DE VEILLE ON/OFF

ECRAN DE VEILLE ON/OFF


 Information sur la source

Note :
8 / 10 - par 2 personnes
8,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Ecrans de veille Classé sous :veille, ecran Niveau :Débutant Date de création :05/04/2007 Date de mise à jour :15/12/2007 00:25:22 Vu / téléchargé :10 390 / 819

Auteur : Galain

Ecrire un message privé
Commentaire sur cette source (19)
Ajouter un commentaire et/ou une note

 Description

Ce code se place dans le Systray et assure l'activation ou la désactivation de l'écran de veille par un click gauche sur l'icone ( soleil = actif et lune = inactif). Un click droit ferme le programme
J'en avais besoin car mon émulateur de console Sega ( eh oui c'est pas tout jeune) se bloquait à cause de l'écran de veille lorsque ce dernier était actif.
Cela évite d'aller dans le panneau de configuration\affichage\ecran de veille pour faire la manipulation

  


 Conclusion

Un grand merci à l'auteur du module de classe : il se reconnaitra

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

06 avril 2007 17:13:47 :
J'ai rajouté la confirmation pour fermer le programme ainsi que l'impossibilité de lancer 2 fois le programme avec App.Previnstance
07 avril 2007 13:14:06 :
J'ai rajouté un timer afin que l'icône du systray suive l'état de l'écran de veille si un autre programme modifie son état.J'ai testé avec panneau de configuration\affichage\écran de veille pour vérifier si l'icône suit les modifications et cela fonctionne nickel.
07 avril 2007 15:37:05 :
correction d'une erreur car le click gauche ne modifiait pas l'état de l'écran de veille
07 avril 2007 16:26:44 :
L'icône dans le systray se modifiait tout seul : c'est corrigé
08 avril 2007 11:07:03 :
Avant le programme forcait l'écran de veille actif au démarrage.Maintenant il ne le fait plus pour respecter le choix de l'utilisateur avant le lancement du programme.En faisant un setup avec lancement du programme après installation et un lancement automatique à chaque session de démarrage de Windows cela roule nickel
15 décembre 2007 00:24:11 :
suite aux remarques de Marco le code a été mis à jour
15 décembre 2007 00:25:22 :
Suite aux remarques de Marco62118 le code a été mis à jour

 Sources du même auteur

Source avec Zip Source .NET (Dotnet) GESTION DU VOLUME SONORE EN VB NET
Source avec Zip Source .NET (Dotnet) BITBLT ENTRE 2 PICTUREBOX EN VB NET
Source avec Zip Source .NET (Dotnet) ACCÈS DIRECT DISQUES ET PARTITIONS VB NET
Source avec Zip CALCUL DE CRC16
Source avec Zip ANALYSE DISQUES ET PARTITIONS

 Sources de la même categorie

Source avec Zip Source avec une capture VINCEBULLES par killerkurgan
Source avec Zip Source avec une capture UN ECRAN DE VEILLE AVEC DES TRIANGLES par zulrigh
Source avec Zip Source avec une capture FISHTANK - SCREENSAVER INTERACTIF : AQUARIUM AVEC POISSONS V... par MadM@tt
Source avec Zip Source avec une capture ECRAN DE VEILLE AVEC COULEUR par amteur
Source avec Zip Source avec une capture ECRAN DE VEILLE AVEC MESSAGE par higgins91

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture ECRAN DE VEILLE AVEC MESSAGE par higgins91
Source avec Zip Source avec une capture (DES) ACTIVER ECRAN DE VEILLE par gregmena
Source avec Zip Source avec une capture MATRIX FALL 3D 3.2 (SCREENSAVER MATRIX EN 3D) par NoRabbit
Source avec Zip MULTISAVER V2.0 BÉTA 1.5 par Sylfurd
Source avec Zip Source avec une capture ECRAN DE VEILLE par Cyril_AC

Commentaires et avis

Commentaire de Galain le 05/04/2007 21:39:48

L'auteur du module de classe est PatriceVB à qui je dis merci.Ce code peut-être amélioré mais pour mon usage il me suffit

Commentaire de EBArtSoft le 05/04/2007 23:59:13 administrateur CS

Raaah non pas patrice... ;-p

Commentaire de lermite222 le 06/04/2007 12:44:31

Bonjour à tous
Et bien bravo... pour ce petit programme, je ne l'ai pas télécharger mais j'ai fait un copier/coller du code et après quelques adaptation pour VB6 (il y avait des mot de syntaxe que je ne connais pas) il à fonctioné du premier coup.
J'ai ensuite fait une ou deux améliorations.(comme de demander une confirmation de fermeture)
C'est encore un API utile à connaître.
Encore merci et bravo.(aussi pour le module de class)

Commentaire de babaslow le 11/06/2007 11:20:53

Slt,

Est-ce que tu pourrais joindre une version compilée pour voir rapidemment à quoi ressemble le prog ?

Merci.

Commentaire de Galain le 11/06/2007 21:00:58

Salut Babaslow
Le site nous demande de ne pas fournir d'EXE pour prévenir tout risque de virus,etc...VBFrance est un site de programmation et non un site de freewares.

Commentaire de 13pour12 le 31/10/2007 17:29:02

bonjour
Je suis intéressé par ce programme, mais je voudrais savoir comment l'utiliser?
Comment le mettre dans le systray?
merci

Commentaire de Galain le 31/10/2007 21:06:45

Salut 13pour12

Si tu as Visual Basic 6.0 il suffite de faire une compilation du programme et de faire un setup d'installation
en suite tu lances l'installation et c'est tout
Si tu n'as pas Visual Basic 6.0 voir ma remarque plus haut
il semet automatiquement dans le Systray et il fonctionne comme une bascule : si l'écran de veille est autorisée il le "désautorise" et l'inverse
A+

Commentaire de 13pour12 le 01/11/2007 08:59:48

merci galain
J'ai le visual basic 6.3 qui est associé à Microsoft Office Excel. Est-ce qu'il me permet de compiler ce programme. J'ai essayé et j'ai l'erreur "attendu: identificateur" au niveau de "Type=Exe" dans
Type=Exe
Form = Form1.frm
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automation
Class=Systray; Systray.cls
IconForm = "Form1"
13pour12

Commentaire de Galain le 01/11/2007 11:24:41

Salut 13pour12

je ne pense pas que tu puisses compiler cette source car dans Office c'est VBA (Visual Basic Application) et non un IDE (Interface de développement) de Visual Basic 6.0 qu'il y a.
Les 2 langages (VBA et VB6.0) ont beaucoup de similitudes mais n'ont pas les mêmes fonctionnalités
Je mets ceci sous toutes réserves car ce n'est que ma pensée et non une certitude

Bonne prog et A+  

Commentaire de marco62118 le 14/12/2007 19:31:57

bonjour
je ne sais plus depuis quand j'ai téléchargé ce logiciel, mais je suis étonné que la dernière version soit bien que j'ai!!
après avoir bien étudié ton petit programe je me suis apperçu d'une grosse erreur qui empêche d'activer l'écran de veille
dans ton prog tu écris à deux endroits:
ret = SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, 0, 1, SPIF_SENDWININICHANGE Or SPIF_UPDATEINIFILE)

alors qu'il faut écrire:
ret = SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, veille, Null, SPIF_SENDWININICHANGE)

'UParam 2ème paramètre
'si la constante précédente "Uaction" est GET alors Uparam est 0
'si la constante précédente "Uaction" est SET alors définissez la nouvelle valeur de Uparam qui sera passée à la fonction

de plus apparement avec window vista je me suis apperçu que l'utilisation de "SPIF_SENDWININICHANGE Or SPIF_UPDATEINIFILE" avait tandance a être obligé à repsser par les proprièté d'affichage pour réactiver correctement l'écran de veille! j'ai donc opté pour un seul paramètre "SPIF_SENDWININICHANGE" j'avoue que je ne sais pas ni comment ni ou il fait soit disant la sauvegarde, mais ça fonctionne mieux.

Aussi un petit truc: c'est la position de la souris pour déterminer le click droit ou gauche, je trouve ça pas mal!!! mais pourquoi une différence de position entre passage, click droit et click gauche? comment as tu trouvé ça? et avec les action sur les boutons de la souris on aurait pas pu faire ( j'ai cherché pas trouvé)?

A+

Commentaire de Galain le 14/12/2007 23:27:58

Salut Marco62118

1° alors qu'il faut écrire:
ret = SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, veille, Null, SPIF_SENDWININICHANGE) : cela fonctionne beaucoup mieux mais pour moi Null doit être remplacer par 0

2° SPIF_SENDWININICHANGE : mise à jour du Win Ini
   SPIF_UPDATEINIFILE : mise à jour de la base de registres
   La mise à jour de la base de registres est préférable : à mon avis tu peux ignorer le Win Ini ( vieux souvenir de Windows 95 et 98 - à tester)

3° pour le passage click droit- click gauche je ne sais plus où j'ai trouvé cela  

Commentaire de lassie14 le 31/03/2008 01:05:13

je ne connais quasiment pas le vb mais ta source m'interesse j'ai visual studio 2008 et je n'arrive pas a le compiler il me mets enormement d'erreur dont la pluspart sont des declaration attendue je ne sais pass ce que cela veut dire enfin bon voila
si vous pouviez m'aidez se serait cool (ou alors savoir comment ou fait en cpp ou c#)

Commentaire de marco62118 le 31/03/2008 11:49:14

bonjour
je ne sais pas la différenceentre vb6 et visualstudio 20008!
mais est ce quie ton prog fonctionne sans être compilé?
et qu'as tu essayé de mettre simplement le prog sans adaptation aucune?

Commentaire de lassie14 le 31/03/2008 12:31:18

visual c'est un ide qui permet de compiler quasiment tout (un tres gros et bon truc)
je voit pas comment tester un programme sans le compiler ?
et sans adaptation ça me fait plein d'erreur

Commentaire de marco62118 le 31/03/2008 12:44:43

si tu veux je peux t'en faire un exécutable et te l'envoyer par mail.
mais si c'est pour étudier le prog je ne peux t'aider, moi j'utilise l'interface de VB6 pour créer mon prog, je le teste et quand il fonctionne bien je le compile pour en faire un executable, là il se eput que VB6 me mette des message  d'erreur car à la compile tout le prog et déclaration sont vérifiées, même celles qui ne servent pas et qu'on aurait pu laisser trainer par erreur. envoi ton mail si tu veux l'exe

Commentaire de lassie14 le 31/03/2008 14:00:40

oui je veut bien merci lassie14@voila.fr

Commentaire de Galain le 01/04/2008 00:38:07

Salut à Lassie14 et Marco62118
Cette source est une source VB 6.0 et ne fonctionne qu'avec celui-ci après l'avoir compilé et installé l'éxécutable
J'ai maintenant Visual Basic 2008 Express mais le programme aurait besoin d' être recodé de A à Z pour fonctionner avec Visual Basic 2008 (Microsoft n'a pas assuré la compatibilité entre les 2 et ce sont d'ailleurs 2 langages très différents)
Côté différences de langage entre VB 6.0 et VB net 2008 je m'en aperçois car je suis en train de recodé le projet "Accès Direct Disques" de VB 6.0 vers VB net 2008 et ce n'est pas de la tarte !!!!!
A+ et bonne prog  

Commentaire de lassie14 le 01/04/2008 00:53:00

ouai mais ça c'est normal le vb et le vb net sont deux language completement different
le premier est compiler puis executer par le moteur win32 le deuxieme et pseudo compiler comme le c# le java # etc (tout les language .net) qui eux sont compiler au lancement et executer par le framework

Commentaire de amenjouj le 11/10/2008 01:58:19

meri boueup

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

ecran de veille [ par minni ] comment peut on créer un concepteur d'écran de veille??Merci!! Ecran de veille et lutte contre le cancer [ par Marc ] Bonjour,Pour votre information...Sur le site ud.com (united device) un écran de veille fruit de la collaboration de Intel,l´université de Oxford et la Mettre ecran en veille [ par xvr232 ] Slt!Qq sait cm mettre l'écran en veille avec vb? Je parle pas de l'ecran de veille, je parle de mettre en veille l'ecran (l'eteindre koi), le mm effet superposition de forms (ecran de veille) [ par neo12 ] Changer les parametres d'un ecran de veille existant [ par Stoomm ] Bonjour, je souhaite pouvoir changer le texte de l'ecran de veille windows qui fait defiler le texte. Le tout en VB biensure, sinon, c'est trop facile ecran de veille [ par sebsoft ] comment utiliser le mot de passe windows dejautiliser par l'utilisateurcomment utiliser la commandeMsgBox Command$Command$="/a"mercisebsoft ecran de veille [ par rudybiss ] Salut!C'est avec une immense joie que je me rertrouve dans ce site car je suis un étudiant en analyse programmation et j'étudie le VB.Mais dans ma pro Probleme avec un ecran de veille [ par Ficarcy0407 ] Voila j'ai fait un ecran de veille, je l'ai compilé en .scr , et je l'ai mis dans le dossier system de windows. Quand je vais dans panneaux de co Ecran de veille [ par vfi ] Comment peut on faire :- interrompre l'écran de veille de windows (faire une simulation de mouvement de la souris ou l'appui sur une touche) - puis le cherche ecran de veille [ par gillesdesantilles ] Bonjour à tous, Je suis débutant de chez débutant en VB6 et je cherche un code simple pour faire un ecran de veille avec un logo(BMP) qui se deplace s


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,794 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales