Changer le fond'ecran

Soyez le premier à donner votre avis sur cette source.

Vue 3 179 fois - Téléchargée 692 fois

Description

En fait, c'est un programme pour changer le fond d'écran du bureau sur Windows XP, ça change à chaque démarrage, sans utiliser la base de registre, pour installer le logiciel, lancer le programme "Installation". voilà, c'est tout !

Aucun bug connus (pour l'instant !)
N'oubliez pas de me critiquer, c'est ça qui fait avancer ...

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
267
Date d'inscription
lundi 22 septembre 2003
Statut
Membre
Dernière intervention
27 novembre 2005

ben apparemment chez moi, il veut pas faire un test if string = booleen ...

pour trouver ou est la cle liee au wallpaper, c'est facile :
-1- c'est dans mon pgm ;-)
-2- tu cree une image sous un nom barbare, du style qsdfsqdf.bmp, tu la met en foncd d'ecran, tu ouvre regedit et tu fais une recherche sur le nom de ton image, et ca te donnera la clef ...

c'est une bonne methode pour detecter les keyloggers non cryptes : tu tape un truc quelquonque, et tu fais une recherche de fichiers *.* contenant le texte que tu viens de taper. Ne fonctionne pas si le keylogger crypte le fichier de log...

Au fait, pour le pb du test, j'ai pas le pgm sous les yeus, mais essaye un truc du genre :
if ActProg <>vbNullString then ....
ou alor ActProg<>"" c'est pareil...
Messages postés
19
Date d'inscription
dimanche 26 janvier 2003
Statut
Membre
Dernière intervention
10 décembre 2005

Ah, voila un commentaire comme j'attendais ...

Donc, c'est vrai est un peu brouillon a des endroits.. en fait je savait pas du tout comment changer le wallpaper donc je me suis un peu embeté ... pour le fichier .ini je regarderai, et pour la base de registre, je sait pas où est située la valeur et la clé qui définit le Wallpaper : pas de pot.

Pour le def et act prog en tant que string c'est bizarre parce que j'ai essayer sur un autre ordi que le mien et ça marche très bien dessus.

J'essaierai de revoir ça quand j'aurai le temps (je suis plus du tout au Visual là )
Messages postés
267
Date d'inscription
lundi 22 septembre 2003
Statut
Membre
Dernière intervention
27 novembre 2005

bon, par quoi je commence ???

deja, j'ai pas le temps de teste pour voire le fonctionnement, donc tite question : le wallpaper change des que tu choisi l'image ou seulement au prochain reboot ??

parceque si ca change qu'au reboot, y'a beaucoup + simple :
http://www.vbfrance.com/code.aspx?ID=17237
L'essentiel du code tiens en 2 lignes : ecrasement du nom du wallpaper dans la base de registre, et dans le fic win.ini

CONSEILS :

-1- la lecture de ton FichOpt : kre vindiou !!!
va voire mon prog (le lien au dessus), tu verra une fonction qui se charge de recuperer les valeurs dans les fichiers ini. je sais pas si ca marche aussi avec d'autres extensions, mais dans ce cas, t'as qu'a renommer ton fic et rajouter quelques caracteres pour respecter la syntaxe des .ini

C'est assez simple a comprendre : ouvre win.ini, au debut tu trouvera ce qui concerne le wallpaper. c'est de la forme
[WallPaper]
WallPaperName = nom_fichier
pour la fonction, tu as besoin de -1- le nom du .ini (pas dur ! :-D) -2- le "conteneur" (j'ai plus le nom exact) WallPaper, et la "variable" WallPaperName. Tu passe tout ca dans les params, et ca te donne nom_fichier

et evidemment, y'a aussi une fonction qui permet d'ecrire les .ini, ce qui te simplifiera aussi l'ecriture de FichSauv


-2- ta fonction changerfon, elle fais quoi ??? parceque c'a m'a l'air complique pour pas grand chose ...

-3- fonction enrnouvfich : simplifiable comme en -1-

-4- apres lecture + detaillee de changerfon :
> met un xubound(tablo,2) et utilise x ensuite, ca t'accelereras un peu le pgm
> if j>x-1 then j0 ======> j=j mod x
> fichtablo(1,j) : papierpeint(fich) ====> papierpeint(tablo(1,j))
juste pour economiser une variable

-5- fonction papierpeint :
dim retval
retval=system....(SPI...,1)
mais tu n'utilise pas retval donc tu peux faire directement

system... SPI....,1



Evite les variables du style
x=variable
fonction_utilisee_une_seule_fois(x)

fais directement fonction_utilisee_une_seule_fois(variable), ca t'economisera du tps processeur (- d'instructions a exec pour un meme resultat) et de la memoire


Un truc auquel je viens de repenser :

dans open fichsauv....
tu fais des redim preserve dans une boucle. ca consomme beaucoup car ca fonctionne de la sorte :
-1- alloc d'un tableau a la nouvelle taille
-2- copie de l'ancien tableau vers le nouveau
-3- suppression de l'ancien tableau

donc grosse depense de ressources inutilement.
au debut de ton fichier, rajoute une option qui donne le nombre de wallpaper dispo. comme ca, tu alloue tout de suite la bonne taille pour ton tablo


voila, sinon c'est pas mal, je suis aussi a la recher de doc pour la fonction system...
PAr contre, le pgm ne marche pas chez moi alors je peux pas tester ... donc je note pas pour l'instant.
apparemment, c'est la ligne If ActProg = True Then dans form_load, et c'est normal : actprog et def en tant que string !!!!!!

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.