Changeur de fond d'écran

Soyez le premier à donner votre avis sur cette source.

Vue 7 456 fois - Téléchargée 1 161 fois

Description

C'est un petit programme que j'ai écris pour une utilisation perso, il permet :
- de changer de fond d'écran au démarrage de windows, et en fonction d'un timer
- on peut bien sûre choisir la manière dont sera affiché l'image : étiré, mosaïque etc
- on peut voir un aperçu de l'image avant de la mettre en fond d'écran
- le programme surveille le dossier contenant les images pour inclure les nouvelles dans la liste

Source / Exemple :


-> Zip
Compilé avec Delphi 2007, sous Vista familiale SP2

Conclusion :


Pas de bug constaté mais la réduction dans la barre des tâches au démarrage me pose quelques problèmes et ne marche pas tout à fait comme je voudrais.
En faîtes Application.ShowMainForm:=False ne semble pas être pris en compte X_X

Un certains nombre de fonctions ne sont pas de moi, j'en ai indiqué les réferences en commentaires dans le code.

Le programme peut sembler bridé par rapports à certaines fonctions qu'il utilise, c'est un choix perso parce que je n'avais pas besoin de plus de fonctionnalités.

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Bacterius
Messages postés
3869
Date d'inscription
samedi 22 décembre 2007
Statut
Membre
Dernière intervention
3 juin 2016
6 -
Il manque :
- TTrayIcon (dans un élan de bonheur j'ai cru qu'il s'agissait de mon composant, de telle façon que j'aurai pu compiler, mais non ^^).
Le fichier .res n'est pas compatible D6 (pas testé D7), mais ça n'entrave pas la compilation.

Une fois après avoir inhibé tout ce qui touchait au TrayIcon, je compile.

---------------------------
Notification d'une exception du débogueur
---------------------------
Le projet AWC.exe a provoqué une classe d'exception EStringListError avec le message 'Indice de liste hors limites (0)'. Processus stoppé. Utilisez Pas-à-pas ou Exécuter pour continuer.
---------------------------
OK Aide
---------------------------

Ceci est valable pour Delphi 6 (personal) et Delphi 7 (personal) sous Vista.

Je ne vais pas plus loin, j'attends déjà l'unité TTrayIcon.

Cordialement, Bacterius !
John Dogget
Messages postés
390
Date d'inscription
vendredi 18 juin 2004
Statut
Membre
Dernière intervention
7 mai 2009
-
TrayIcon est un compo standard de Delphi depuis 2006 ...

Pour le EStringListError, c'est parce que le fichier ini qui contient les reglages du programme (AWC.ini) pointent vers un dossier qui n'existe pas chez toi.
Bacterius
Messages postés
3869
Date d'inscription
samedi 22 décembre 2007
Statut
Membre
Dernière intervention
3 juin 2016
6 -
...
Bon ben tu as deux milles euros à me préter pour que j'achète D2006 ? Ou n'existe-t-il pas un autre moyen pour permettre à cette source d'être accessible aux personnes ne disposant pas du dernier Delphi sorti ?
Pour le EStringListError, ça vient peut-être du fait que je suis sous Vista et que je lui ai pas encore montré qui est le maître et que l'UAC n'en fait qu'à sa tête ... :'<

Cordialement, Bacterius !
John Dogget
Messages postés
390
Date d'inscription
vendredi 18 juin 2004
Statut
Membre
Dernière intervention
7 mai 2009
-
Non ça viens pas de l'UAC ^^
J'aurais simplement dû inclure dans le code un garde fou pour empecher ce soucis si le dossier n'existes pas.

Et pour les 2000€, ça va pas être possible !

Cela dit, cette partie du code est vraiment minime et peu être remplacé par un autre compo genre JVCL (qui est très bien aussi) ou même une création "à la main" de l'icône dans la barre des tâches.
Bacterius
Messages postés
3869
Date d'inscription
samedi 22 décembre 2007
Statut
Membre
Dernière intervention
3 juin 2016
6 -
Oui tu prends Paint et tu dessines l'icône à côté de l'horloge ^^

Cordialement, Bacterius !

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.