Et oui, c'est en effet une bonne remarque ! On peut en effet imaginer de nombreuses variantes : faire un faisceau assombrissant, des dégradés de couleurs en injectant des fonctions de trigo dans les formules des couleurs, etc...

Et on peut aussi facilement en faire un économiseur d'écran (on remplace le guidage via la souris par un mouvement automatique du faisceau et on le fait rebondir sur les bords de l'écran par exemple).

Bonsoir,
Je ne sais pas d'où vient votre problème... La source a été conçue sous Delphi 6/7. Je crois qu'elle était encore tout à fait compatible Delphi 2005. Depuis j'ai arrêté de faire du Delphi, et peut-être que la propriété TBitmap.Scanline a disparu !? Vous pouvez toujours consulter la documentation de l'objet TBitmap. J'essayerai de regarder ça de mon côté quand j'aurai un peu de temps.

On n'arrête pas le progrès :-D !

Et oui, ce n'est qu'une affaire de handle ;-) (on pourrait penser de prime abord que le code fait une "copie" du canvas à un instant donné alors qu'en réalité il récupère vraiment le canvas puisqu'il lui attribue son handle).
En effet, j'ai oublié de virer "rect0" :-/ (qui servait dans la première version du code).
Bien vu pour la fonction ColorToString (je ne connaissais pas) ;-). De plus "coult" ne servait effectivement à rien, même avant l'utilisation de ColorToString (j'avais fait ce code quand je débutais en Delphi [NB : je suis toujours débutant, mais un peu moins :-D], et en le relisant avant de le poster ici je n'ai pas fais gaffe :-/ ).
Enfin, le code fonctionne parfaitement sans "coulh", mais cette fois je n'ai pas compris pourquoi (à quoi sert dès lors la fonction ColorToRGB ?)...
En tout cas merci beaucoup pour cette intervention et désolé de t'avoir paru agressif ;-).

Vous nous proposez une petite expérience dans les 5 premières lignes de votre message, et bien soit, essayez vous-même, et vous verrez que vous avez simplement eu tord de faire le malin.
Cela dit je ne dispose que de Windows XP et ne peut en conséquence garantir que ce que vous prédisez ne se produise pas sous une autre version de Windows...

Oui, je n'avais pas pensé aux pixels "dynamiquement colorisés"...
Ce problème est réglé dans la nouvelle version. Et la fenêtre ne risque plus de "buter dans les coins" puisque l'utilisateur la place désormais où il veut.

Sympa ce petit programme !

Très beau travail !
J'ai toutefois remarqué un petit bug : si l'on fait sortir la fenêtre de l'écran puis qu'on la ramène, le dernier motif dessiné est effacé...

Merci pour ces commentaires ;-).

Je ne suis pas sûr de comprendre ce que vous cherchez à faire... S'il s'agit d'afficher une horloge analogique sur une page web, alors c'est du côté du JavaScript (un exemple : http://www.espacejavascript.com/script.php?id=82) où du Flash qu'il faut chercher : un code Delphi ne peut pas être utilisé (du moins pas directement) sur une page HTML.