Developpez.com

Delphi

Choisissez la catégorie, puis la rubrique :


ScreenSaverPreview

Date de publication : 10/10/2002 , Date de mise a jour : 21/09/2004

Par Pierre Castelain
 

Création d'un composant permettant d'afficher l'aperçu d'un économiseur d'écran dans un programme Delphi


1. Description
2. Mécanisme
3. Téléchargement et références


1. Description

Au cours d'une discussion sur le forum Delphi de developpez.com a été posé une question intéressante : comment afficher l'aperçu d'un économiseur d'écran sur une fenêtre Delphi. Il s'avère qu'il existe une solution relativement simple. Cette solution a été utilisée ici pour construire un petit composant simple d'utilisation.


2. Mécanisme

Les économiseurs d'écran sont des exécutables qui doivent respecter quelques contraintes simples. Ils doivent particulièrement supporter certains paramètres en ligne de commande. Celui qui nous intéresse est le paramètre /p. Celui-ci indique à l'économiseur qu'il ne doit pas s'afficher en plein écran mais dans une fenêtre dont le handle est fourni comme second paramètre.
Reste à savoir comment l'arrêter. Il nous suffit d'envoyer un message WM_CLOSE à la fenêtre de l'économiseur. Pour notre composant, nous identifions cette fenêtre en énumérant les fenêtres clientes du composant.


3. Téléchargement et références

Le composant ainsi qu'un projet de test archivés dans un fichier zip : ScreenSaverPreview.zip

Vous trouverez un exemple de création d'un écran de veille en Delphi avec la description des paramètres sur le site de Nono40 : http://nono40.developpez.com/tutoriel/delphi/screensaver/



Les sources présentées sur cette page sont libres de droits et vous pouvez les utiliser à votre convenance. Par contre, la page de présentation constitue une œuvre intellectuelle protégée par les droits d'auteur. Copyright © 2002 Pierre Castelain. Aucune reproduction, même partielle, ne peut être faite de ce site et de l'ensemble de son contenu : textes, documents, images, etc. sans l'autorisation expresse de l'auteur. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.

Responsables bénévoles de la rubrique Delphi : Gilles Vasseur - Alcatîz -