 |
|
 |
|
 |
24 - OBTENIR LA COULEUR D'UN POINT DE L'ÉCRAN
|
|
|
|
PRÉSENTATION :
Il s'agit juste d'obtenir la couleur d'un point de l'écran...
NOTES :
CODE :
// Fonction donnant la courleur du point (x,y) de l'écran
Function CouleurPointEcran(x,y:Integer):TColor;
Var Dc : HDC;
Begin
// Création d'un contexte d'affichage non lié à une fenêtre
// donc permet d'accéder à l'écran entier
DC := CreateDC('DISPLAY',Nil,Nil,Nil);
Try
// Obtenir la couleur du point
Result:=GetPixel(DC,X,Y);
Finally
// ne pas oublier de libérer le contexte, c'est une ressource rare.
DeleteDc(DC);
End;
End;
|
| |
 |
|
 |
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 oeuvre intellectuelle protégée par les droits d'auteurs. Copyright ©
2003 Bruno Guérangé. 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'à 3 ans de prison et jusqu'à 300 000 E
de dommages et intérêts.
Cette page est déposée à la
SACD.
|
