Grille magnétique sur timage

Description

Bonjour à tous et toutes...
Bon comme je ne trouvais aucune réponse à mon problème ni sur le forum
ni dans les sources, ben je me suis penché sur le sujet pendant 2 jours...
Et ca donne ce code...

Donc comme le dit le titre (très explicite, vous me l'accorderez), ce code créé
une grille sur un TImage et la rend "magnétique", cad que le curseur de la souris
ne se place QUE sur la grille et pas sur le reste du TImage...

J'ai commenté le code comme je le fais tout le temps donc j'espère que ça vous suffira...

Conclusion :


Pour finir j'aimerai souligner les pratique utilisées dans mon code:
- Création dynamique d'un TImage (en option)
- Utilisation du DoubleBuffered (pour ceux qui ne connaissent pas)
- Utilisation de la fonction mod de delphi (modulo)
- Utilisation des fonctions Shl et Shr de Delphi (Shift Left et Shift Right)
- Utilisation de TQuelqueChose(Sender) dans les appels de procedure par différentes sources
- Utilisation du Scanline
- Utilisation de la fonction Format() de Delphi (pour ceux qui ne connaissent pas)

Bonne prog' à tous !

Je ne sais pas dans quel niveau de difficulté situer mon code, mais je ne crois pas que ca soit débutant donc...

Codes Sources

A voir également