SCREENSOURCE, RÉCUPÉRATION DES COULEURS ÉCRAN EN RVB, TSL, TSV, CAPTURE D'ÉCRAN,
cs_Delphiprog
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
9 janvier 2013
-
7 mai 2004 à 07:38
ronchon_sama Messages postés 14 Date d'inscription dimanche 26 octobre 2003 Statut Membre Dernière intervention 4 juillet 2005 - 13 sept. 2005 à 11:56
ronchon_sama Messages postés 14 Date d'inscription dimanche 26 octobre 2003 Statut Membre Dernière intervention 4 juillet 2005 - 13 sept. 2005 à 11:56
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/22586-screensource-recuperation-des-couleurs-ecran-en-rvb-tsl-tsv-capture-d-ecran-adobe-color-picker
https://codes-sources.commentcamarche.net/source/22586-screensource-recuperation-des-couleurs-ecran-en-rvb-tsl-tsv-capture-d-ecran-adobe-color-picker
13 sept. 2005 à 11:56
Voilà, c'est mis à jour.
13 sept. 2005 à 00:47
Dommage je me serais volontiers penché sur les bugs, mais supprimer touts les références à Delphi 2005 là c'est un peu au-dessus de mes forces.
Re-dommage car ce code me semblait prometteur
Bien cordialement
8 août 2005 à 16:19
Pour les erreurs, oui, cela est du au fait que tu sois sous Delphi 7, l'application, comme precise dans l'historique, a ete reecrite sous Delphi 2005. Les couleurs Web (les clWeb...) ne sont pas declarees. Pour le moment, il n'y a plus de composants exterieurs au niveau de l'application.
Maintenant, apres cette mise a jour, j'ai eu pas mal de soucis avec 2005 et j'ai du repasser sous Delphi7, ce qui s'annonce comme une bonne nouvelle pour toi en fait ;)
Maintenant, l'appli est toujours en stade beta et risque d'y rester pour un bon moment, parce que je n'ai vraiment plus du tout le temps de travailler dessus...
Il y a pas mal de bugs au niveau des dernieres fonctionnalites ajoutees (notemment entre le 'premier plan' et la 'barre des taches', je les avais juste 'posees a la va-vite' dans le code.
Je mettrais les sources a jour pour la version Delphi7 si je peux ce soir.
8 août 2005 à 10:21
J'ai voulu tester cette source mais lors de la compilation sous Delphi7, j'ai eu ce message d'erreur :
[Erreur] uColorUtil.pas(863): Identificateur non déclaré : clWebLightCoral'
[Erreur] uColorUtil.pas(863): Etiquette de CASE dupliquée
[Erreur fatale] uColorUtil.pas(871): Compilation abandonnée; trop d'erreurs
A quoi cela est-il dû ?
Serait-ce dû à ce que Delphi 7 ne contient pas tout ce qu'il faut ?
Dois-je rajouter un composant, si oui, lequel ?
Merci de votre réponse
Bien cordialement
8 mai 2004 à 03:05
La valeur de la Teinte reste dans un interval compris entre 0 et 360 au lieu de 0 et 255, juste une règle de 3 à appliquer, mais il y a aussi une erreur de précision à cause des arrondissements. J'ai constaté cela avec Paint Shop Pro avec, par exemple, une valeur RVB de (192, 192, 255). PSP donne TSL (169, 255, 224) tandis que ma fonction, avec la règle de 3, donne TSL (170, 255, 223).
Autre précision, si vous regardez les valeurs TSL d'un TColorDialog, celles-ci seront différents de mon programme puisqu'elles sont exprimées dans un espace compris entre 0 et 240.
Je vais voir pour corriger ce bug, Delphi 6 possède l'unité GraphUtil qui contient déjà cette fonction.
7 mai 2004 à 12:06
7 mai 2004 à 10:34
7 mai 2004 à 07:38