WIDGETS GAMBAS
LOGICIELS GAMBAS 3
TUTORIELS
VISITES

   visiteurs

   visiteurs en ligne

Où ça, qui ça?
Manipuler les images - Traitement d'image
LE TRAITEMENT D'IMAGE AVEC GAMBAS LINUX

bricolimage.png
Faire du traitement d'image, est ce possible sous gambas ? Ma réponse est oui !
Et même tout un lot de traitement fantastique. Flou, implode, etirer, ombre, etc... autant d'effet que vous pourrez appliquer à votre image.

Remarque : J'attire votre attention qu'il faut différencier une PICTURE et une IMAGE. Ce n'est pas la même chose. Mais il existe un moyen de passer de l'un à l'autre.

Il faut aussi cocher le composant gb.image dans les propriétés de votre projet.

Le traitement s'applique à une IMAGE et non une PICTURE.

C'est bon ? Etes vous prêt ? Allons y !

pour réaliser un traitement sur une image, trois étapes :

A) Ouverture de notre image

DIM monimage AS Image
DIM chemin AS String
monimage = Image.Load(chemin)

B) LE TRAITEMENT

monimage.Blur(mavaleur)

C) L'affichage dans une picturebox

PictureBox2.Picture = monimage.Picture

Maintenant que vous savez tout passons à la pratique.
Dans l'exemple téléchargeable ci dessous , vous trouverez des effets simples. Il en existe pas mal d'autre.
Pour connaitre tous les effets disponibles, allez voir dans la doc ici à la dernière ligne en bas .
A bientôt
wink

TELECHARGER LE PROGRAMME EXEMPLE

Voici le code de l'application  :

' Gambas class file
PUBLIC monimage AS Image
PUBLIC chemin AS String

PUBLIC SUB _new()
END

PUBLIC SUB Form_Open()
ME.Center
chemin = Application.Path & "/img/salon.png"
'lecture de l'image
monimage = Image.Load(chemin)
PictureBox1.Picture = Picture.Load(chemin)
END

PUBLIC SUB Menu2_Click()
ME.Close
END

'reglage luminosite
PUBLIC SUB Slider1_Change()
monimage = Image.Load(chemin)
monimage.Balance(Slider1.Value / 100, Slider2.Value / 100, Slider3.Value / 100)
PictureBox2.Picture = monimage.Picture
END

'reglage contraste
PUBLIC SUB Slider2_Change()
monimage = Image.Load(chemin)
monimage.Balance(Slider1.Value / 100, Slider2.Value / 100, Slider3.Value / 100)
PictureBox2.Picture = monimage.Picture
END

'reglage du gamma
PUBLIC SUB Slider3_Change()
monimage = Image.Load(chemin)
monimage.Balance(Slider1.Value / 100, Slider2.Value / 100, Slider3.Value / 100)
PictureBox2.Picture = monimage.Picture
END

'densité du flou
PUBLIC SUB Slider4_Change()
monimage = Image.Load(chemin)
monimage.Blur(Slider4.Value / 100)
PictureBox2.Picture = monimage.Picture
END

'densite effet charcoal
PUBLIC SUB Slider5_Change()
monimage = Image.Load(chemin)
monimage.Charcoal(Slider5.Value / 100)
PictureBox2.Picture = monimage.Picture
END

'valeur de désaturation
PUBLIC SUB Slider6_Change()
monimage = Image.Load(chemin)
monimage.Charcoal(Slider6.Value / 100)
PictureBox2.Picture = monimage.Picture
END

'minimise le bruit
PUBLIC SUB Button1_Click()
monimage = Image.Load(chemin)
monimage.Despeckle()
PictureBox2.Picture = monimage.Picture
END

'contour de l'image
PUBLIC SUB Slider7_Change()
monimage = Image.Load(chemin)
monimage.Edge(Slider7.Value / 100)
PictureBox2.Picture = monimage.Picture
END

'egalisation des couleurs
PUBLIC SUB Button2_Click()
monimage = Image.Load(chemin)
monimage.Equalize()
PictureBox2.Picture = monimage.Picture
END

'choix couleur adoucissement
PUBLIC SUB ColorChooser1_Change()
ValueBox1.Value = ColorChooser1.Value
END

'effet adoucissement
PUBLIC SUB Slider8_Change()
monimage = Image.Load(chemin)
monimage.Fade(ValueBox1.Value, Slider8.Value / 100)
PictureBox2.Picture = monimage.Picture
END

'conversion en niveau de gris
PUBLIC SUB Button3_Click()
monimage = Image.Load(chemin)
monimage.Gray()
PictureBox2.Picture = monimage.Picture
END

'choix couleur implosion
PUBLIC SUB ColorChooser2_Change()
ValueBox2.Value = ColorChooser2.Value
END

'facteur d'implosion
PUBLIC SUB Slider9_Change()
monimage = Image.Load(chemin)
monimage.Implode(Slider9.Value / 100, ValueBox2.Value)
PictureBox2.Picture = monimage.Picture
END


Date de création : 18/12/2009 @ 22:56
Dernière modification : 18/12/2009 @ 23:16
Catégorie : Manipuler les images
Page lue 3409 fois


Imprimer l'article Imprimer l'article


react.gifRéactions à cet article


Réaction n°1 

par valaquarus le 17/04/2020 @ 16:59

 Excellent programme de démonstration.Une erreur facile à corriger : image.charcoal est utilisé à la place de image.desaturate.Par contre chez moi image.charcoal plante la machine systématiquement, dommage car c'est un effet sympa.Philippe.

ACCES RAPIDE
RECHERCHE




LOGICIELS GAMBAS 2
LES INSTRUCTIONS
LES COMPOSANTS
Divers

^ Haut ^