Affichage d'un TBitmap en 256 niveaux de gris

Bonjour à tous,

Voilà j'ai crée dans mon programme un TBitmap, dans lequel j'écris pixel par pixel une image (qui ne viens pas d'un fichier).
Ensuite je fais Draw sur ma form.

Seulement mon image du début est en niveaux de gris.
J'ai essayer de mettre PixelFormat à pf8bits.
Mais cela ne suffit pas, cela m'affiche une image visiblement en couleur indexée 256 couleurs.

Je n'ai pas trouvé dans la documentation de la VCL comment préciser (pour une image 256 couleurs) si elle est en niveaux de gris ou si elle est en 256 couleurs indexées.

Peut-être faut il allouer et affecter une palette de gris dans mon_bitmap->Palette ?

Merci d'avance.

Salut!

Si tu as besoin de code je peux en donner.
Pour une solution plus simple et toute faite, il suffit d'utiliser le bitmap de cette miniature (zip) dont la palette est en niveaux de gris cohérent (ScanLine te renverra un index correspondant effectivement au niveau de gris).

A plus !

Merci pour ton aide.

Je tiens aussi à me remercier particulièrement car j'ai trouvée une autre solution par moi-même (qui évite de passer par un fichier de palette extérieur à mon programme). (Non non j'ai pas les chevilles ...)

Bon j'ai eu une bonne inspiration.

Un appel à CreatePalette + palette allouée + palette initialisée uniformément + mon_bitmap->Palette = hmapalette.

Ca semble marcher (en tout cas je n'ai que du gris).

Par contre je dois avoir des erreurs dans l'image que j'affiche car les quelques pixels les plus noirs sont affichés en blanc (surement une palette non uniforme quelquepart : fichier, bitmap, hpalette ?).

Merci.

Bon j'ai toujours mes pixels les plus noirs qui sont mappés en blancs (surement les 22 couleurs réservées !?).

Aprés investigation mes palettes de gris sont bien uniformes à la fois dans les fichiers, dans le bitmap et dans ma hpalette.

Donc je me dis que cela doit surement venir d'un realize entre palette de l'image et palette système (pourtant je suis bien en 32 bits d'affichage).

Bizarre ... Une idée pour corriger ce problème ?

Salut !

A titre perso, je ne crée pas de nouvelle palette !
Je me contente de modifier les entrées à partir d'un bitmap généré par l'éditeur d'images fourni avec BCB ! A ce stade ce bitmap contient les 256 couleurs standard VGA.
Lorsque cette modification est faite, je sauvegarde le bitmap sous un autre nom, ce programme ne servant qu'à générer des bitmaps préparés.
Ensuite, j'incorpore ces bitmaps dans le programme de traitement d'images.

Code:

---

Graphics::TBitmap *Rouge = new Graphics::TBitmap;

---

Dans le constructeur de ma form, je fais par exemple, pour récupérer un dégradé de rouge :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Rouge->LoadFromFile(Filepath + "Ref.bmp"); HPALETTE H = Rouge->Palette; PALETTEENTRY E; for(int j = 0; j<256; j++) { E.peRed = (Byte)j; //dégradé de rouge E.peGreen = 0; E.peBlue = 0; E.peFlags = 0; SetPaletteEntries(H,j,1,&E); } Rouge->SaveToFile(Filepath + "Red.bmp"); delete Rouge;

---

Pour un gris, on sait que R == G == B

Ca fonctionne très bien (sur mon BCB3 Pro)!

A plus !

Merci henderson,

mes excuses :oops: aprés vérification rapidede mon code j'avais une bête ligne de gestion des images binaires qui trainaient :

Code:

---

1 2	if (pixels[x][y] == 1) pixels[x][y] = 255;

---

Pb. résolu. Merci de m'avoir accordé du temps.