résultat binarisation d'image

Version imprimable

j'ai programmer une code de binarisation d'une image bitmap sous builder c++6 mais le résultats n'est pas comme je le veux et voici mon code:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
void __fastcall TForm1::Binarisation1Click(TObject *Sender)
{
   Graphics::TBitmap* Image;
   Image = new Graphics::TBitmap();
   Image->Height = Image1->Picture->Height;
   Image->Width = Image1->Picture->Width;
 
   StringGrid1->RowCount = Image->Height;
   StringGrid1->ColCount = Image->Width;
 
   for (int j = 1; j <=Image1->Picture->Width ; j++)
     Image->Canvas->Pixels[i][j] = RGB( (int) GetRValue(ColorToRGB(Image1->Canvas->Pixels[i][j])), (int) GetRValue(ColorToRGB(Image1->Canvas->Pixels[i][j])), (int) GetRValue(ColorToRGB(Image1->Canvas->Pixels[i][j])));
     if(Image->Canvas->Pixels[i][j] <= 128)
     {
      StringGrid1->Cells[j][i] = 0;
      Image->Canvas->Pixels[i][j] = RGB( (int) GetRValue(ColorToRGB(0)), (int) GetRValue(ColorToRGB(0)), (int) GetRValue(ColorToRGB(0)));;
     }
     else
     {
       StringGrid1->Cells[j][i] = 255;
       Image->Canvas->Pixels[i][j] = RGB( (int) GetRValue(ColorToRGB(255)), (int) GetRValue(ColorToRGB(255)), (int) GetRValue(ColorToRGB(255)));
     }
    for (int i = 1; i <=Image1->Picture->Height ; i++)
    {
    }
                                               Image2->Picture->Bitmap->Assign(Image);
}

je ne sais pas ou est l'erreur. svp aider moi

:tagcode:

Ah, enfin, tu proposes du code !
Bon tu demandes où est l'erreur, je dirais plutôt, où est-ce qu'il n'y a pas d'erreur !

Manque des Accolades, boucle écrite n'importe comment, tu ne comprend même pas ce que tu as pondu, cela ne compile même pas !

je sais que mes réponses on été modéré, je t'avais écrit l'algo
Code:

1 2 3 4 5 6 7 8 9 10 11 12 pour chaque colonne c debut pour chaque ligne l debut si pixels[c, l].Canal.Bleu > seuil alors pixels[c, l].Canal.Bleu si pixels[c, l].Canal.Rouge > seuil alors pixels[c, l].Canal.Rouge si pixels[c, l].Canal.Vert > seuil alors pixels[c, l].Canal.Vert fin fin

12/05/2011, 15h50
asma88

resultat de binarisation

mon image est au niveau de gris je lis pour chaque pixel et j'ai une seuil=15 si pixel[i][j]<=seuil alors pixel[i][j]=0 sinon pixel[i][j]=255

pourquoi deux réponses ?
la balise code c'est uniquement pour le code, cela permet de conserver l'indentation d'un code ou d'un algo, a utiliser au bon moment !

Le problème n'est pas la gestion du seuil, c'est l'imbrication des boucles !
Tu n'as pas compris ce qu'était un Niveau de Gris dans un TBitmap en RVB

tu n'es pas loin d'un résultat !
Poursuit les efforts !
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 pour chaque colonne c debut pour chaque ligne l debut si pixels[c, l].Canal.Bleu est différent de pixels[c, l].Canal.Rouge ou si pixels[c, l].Canal.Bleu est différent de pixels[c, l].Canal.Vert ou si pixels[c, l].Canal.Rouge est différent de pixels[c, l].Canal.Vert alors pixels[c, l].Canal.Bleu = (pixels[c, l].Canal.Bleu + pixels[c, l].Canal.Rouge + pixels[c, l].Canal.Vert) / 3 finsi si pixels[c, l].Canal.Bleu > seuil alors pixels[c, l].Canal.Bleu = 255 sinon pixels[c, l].Canal.Bleu = 0 finsi pixels[c, l].Canal.Rouge = pixels[c, l].Canal.Bleu pixels[c, l].Canal.Vert = pixels[c, l].Canal.Bleu fin fin
tu utilises les macros de wingdi, c'est bien
Code:

1 2 3 #define GetRValue(rgb) (LOBYTE(rgb)) #define GetGValue(rgb) (LOBYTE(((WORD)(rgb)) >> 8)) #define GetBValue(rgb) (LOBYTE((rgb)>>16))
Mais, il y a nettement plus rapide, pourquoi faire des opérations de décalage de bit en RunTime alors que l'on peut le faire à la compilation !
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 typedef struct { union { struct { TColor Color; }; struct { Byte R; Byte V; Byte B; Byte A; }; }; } TRGBColor;

12/05/2011, 16h10
asma88

moi j'ai fais l'éxecution j'ai pas des erreurs mais j'ai pas une image binarisé le résultat est une image blanc et un point noir je sais pas pourquoi.

Tu plaisantes ? Pas avec le code fourni !
Celui là ne compile pas !
for sans {
utilisation de i avant sa déclaration ! ou alors tu un autre i déclaré en global avant !

sinon, ton explication du code est correct, et c'est ce que fait ton code, ta boucle tourne dans le vide
tu ne modifie qu'un seul pixel effectivement, tu devrais apprendre les bases du C++ comme le for, le if, les {}, la gestion de portée de déclaration dans un bloc...
Après, une fois que tu connaitras les bases, tu pourras t'attaquer à ce type de calcul, certe basique mais qui demande un minimum de maitrise du langage !

Tient, voici un code tout à fait convenable !
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 type TRGBColor = record case boolean of True: ( Color: TColor ); False: ( R, V, B, A: Byte; ); end; procedure TForm1.Binarisation1Click(Sender: TObject) var x: Integer; y: Integer; NumColor: TRGBColor; begin with Image1 do begin for x := 0 to Picture.Width -1 do // -1 ou pas, je sais jamais ! begin for y := 0 to Picture.Height -1 do begin NumColor.Color := Canvas.Pixels[x, y]; if ((NumColor.R <> NumColor.V) or (NumColor.R <> NumColor.B) or (NumColor.V <> NumColor.B)) NumColor.R := IfThen((NumColor.R + NumColor.V + NumColor.B) div 3 > 128, 255, 0) else NumColor.R := IfThen(NumColor.R > 128, 255, 0); NumColor.V := NumColor.R; NumColor.B := NumColor.R; Canvas.Pixels[x, y] := NumColor.Color; end; end; end; end;

12/05/2011, 16h30
asma88

est ce que je peux envoyer mon application et tu le voix pour me dite où est le pbm.
12/05/2011, 16h34
ShaiLeTroll

Je ne suis pas là pour faire ton devoir !
Tu DOIS trouvé toute seule !
Essaye de comprendre un peu plus !
J'ai fourni un Algo et sa mise en oeuvre en Delphi, c'est pas difficile d'essayer de comprendre et faire une version C++
12/05/2011, 16h38
asma88

1 pièce(s) jointe(s)

ça c'est mon application svp voir le.merci

Le code du RAR est nettement mieux !

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
//---------------------------------------------------------------------------
void __fastcall TForm1::Binarisation1Click(TObject *Sender)
{
   Graphics::TBitmap* Image;
   Image = new Graphics::TBitmap();
   Image->Height = Image1->Picture->Height;
   Image->Width = Image1->Picture->Width;
 
   StringGrid1->RowCount = Image->Height;
   StringGrid1->ColCount = Image->Width;
 
   for (int j = 1; j <=Image1->Picture->Width ; j++)
    for (int i = 1; i <=Image1->Picture->Height ; i++)
    {
     Image->Canvas->Pixels[i][j] = RGB( (int) GetRValue(ColorToRGB(Image1->Canvas->Pixels[i][j])), (int) GetRValue(ColorToRGB(Image1->Canvas->Pixels[i][j])), (int) GetRValue(ColorToRGB(Image1->Canvas->Pixels[i][j])));
     if(Image->Canvas->Pixels[i][j] <= 128)
     {
      StringGrid1->Cells[j][i] = 0;
      Image->Canvas->Pixels[i][j] = RGB( (int) GetRValue(ColorToRGB(0)), (int) GetRValue(ColorToRGB(0)), (int) GetRValue(ColorToRGB(0)));;
     }
     else
     {
       StringGrid1->Cells[j][i] = 255;
       Image->Canvas->Pixels[i][j] = RGB( (int) GetRValue(ColorToRGB(255)), (int) GetRValue(ColorToRGB(255)), (int) GetRValue(ColorToRGB(255)));
     }
    }
                                               Image2->Picture->Bitmap->Assign(Image);
}

une seule ligne à corriger !

Code:

if(Image->Canvas->Pixels[i][j] <= 128)

Cela nécessite de comprendre le TColor et la notion de RVB, savoir ce que faisait GetRValue que tu utilise n'importe comment et sans comprendre puisque tu l'utilise pas au moment où il faut et que l'utilise quand c'est inutile !

simplification

Code:

1
2
  StringGrid1->Cells[j][i] = 0;
  Image->Canvas->Pixels[i][j] = clWhite;

Code:

1
2
  StringGrid1->Cells[j][i] = 255;
  Image->Canvas->Pixels[i][j] = clBlack;

Code totalement inutile

Code:

     Image->Canvas->Pixels[i][j] = RGB( (int) GetRValue(ColorToRGB(Image1->Canvas->Pixels[i][j])), (int) GetRValue(ColorToRGB(Image1->Canvas->Pixels[i][j])), (int) GetRValue(ColorToRGB(Image1->Canvas->Pixels[i][j])));

12/05/2011, 16h46
asma88

je suis désolé pour ces questions :cry:
12/05/2011, 16h50
ShaiLeTroll

Quelle Question ?
Tu ne poses pas de question, tu attends que l'on te fournisse un code !

Moi, je soulève des problèmes que tu dois résoudre !
tu n'es pas loin d'un résultat, faut juste changer 128 en une autre valeur, 128 c'est une valeur pour un seul canal, un TColor c'est 3 canaux R, V et B plus la Transparence !
La Solution étant 808080 ! mais qu'est ce que 808080 par rapport à 128 !
12/05/2011, 16h50
asma88

j’essaye d'appliquer tes conseil et je te donne une réponse. merci

Salut,
Le traitement d'image que tu a posté comporte plusieurs erreurs:

confusion entre les valeurs de chrominance RGB Codées de 0.. 255 soit 256 valeurs
Parcour des pixels de l'image erroné, les listes de la VCL démarrent toujours de 0 à n-1 -> ainsi dans ton code la première ligne ,respectivement colonne est oubliée

Il existe un autre possibilité en calculant la valeur de la luminance de chaque pixel en utilisant la formule suivante
Y=.299*R + .587*G + .114*B;
ton code devient alors
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 void __fastcall TForm1::Binarisation1Click(TObject *Sender) { Graphics::TBitmap* Image; Image = new Graphics::TBitmap(); Image->Height = Image1->Picture->Height; Image->Width = Image1->Picture->Width; StringGrid1->RowCount = Image->Height; StringGrid1->ColCount = Image->Width; unsigned char R,G,B; TColor Value; float Y; for (int j = 0; j <Image1->Picture->Width ; j++) for (int i = 0; i <Image1->Picture->Height ; i++) { Value=ColorToRGB(Image1->Canvas->Pixels[i][j]); R=GetRValue(Value); G=GetGValue(Value); B=GetBValue(Value); Y=.299*R + .587*G + .114*B; StringGrid1->Cells[j][i] =Value ; if(Y<128) // milieu de l'échelle du gris Image->Canvas->Pixels[i][j] =clBlack; else Image->Canvas->Pixels[i][j] = clWhite; } Image2->Picture->Bitmap->Assign(Image); }
cordialement