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 ...
Aucun bug connus (pour l'instant !)
N'oubliez pas de me critiquer, c'est ça qui fait avancer ...
Codes Sources
A voir également
- Qsdfsqdf
- Fond ecran code - Meilleures réponses
- Visual Basic / VB.NET : Changer le fond d'écran - CodeS SourceS - Guide
- Visual Basic / VB.NET : Change fond ecran aleatoire (bmp, jpg, gif) - CodeS SourceS - Guide
- Visual Basic / VB.NET : Deskpaper (changement de fond d'écran auto) - CodeS SourceS - Guide
- Changement de fond d'écran à chaque démarrage - Codes sources - C / C++ / C++.NET (Divers)
- C# / .NET : Changer de fond d'écran - CodeS SourceS - Guide
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...
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à )
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.