Discussion :

[dleu]

Bonjour,

Je vais encore avoir besoins de vos lumières : je tente de remplir des zones dans une image. L'image a un fond blanc dans lequel des zones sont dessinées en noir. Je tente de remplir les zones blanches par de la couleur rouge.

Si je fais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Image2.Picture.Bitmap.Canvas.Brush.Color:=clRed;
Image2.Picture.Bitmap.Canvas.FloodFill(x,y,clBlack,fsBorder);

ça ne marche pas.

Si je fais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Image2.Canvas.Brush.Color:=clRed;
Image2.Canvas.FloodFill(x,y,clBlack,fsBorder);

ça ne marche pas non plus.

Pourtant si je remplace mon TImage par un PaintBox

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
PaintBox1.Canvas.Brush.Color:=clRed;
PaintBox1.Canvas.FloodFill(x,y,clBlack,fsBorder);

dans ce cas, ça marche.

Vous me direz que je n'ai qu'à utiliser un paintbox mais cela ne m'arrange pas. Je croyais que la méthode FloodFill s'appliquait à tous les canevas.

Qu'est-ce qui cloche ?

Merci de m'aider.

Didier

[Philippe Gormand]

Bonsoir.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Image2.Picture.Bitmap.Canvas.Brush.Color:=clRed;
Image2.Picture.Bitmap.Canvas.FloodFill(x,y,clBlack,fsBorder);
Image2.Refresh;

A+

[dleu]

Rien à faire même avec le refresh ça ne marche pas.