Mettre une image en flou !!! (pixelisation)

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 381 fois - Téléchargée 41 fois

Contenu du snippet

juste mettre une imge en flou comme dit le titre avec une image principal une image de reception un nivo et un mode....

Source / Exemple :


Private Sub Command2_Click()
flou Picture1, Picture2, 50, 1 'modepuiss = 1 ou 2 ou 3 .... = le scale mode
End Sub

Sub flou(Picture1 As PictureBox, Picture2 As PictureBox, Nivo, ModePuiss As Integer)
Picture1.ScaleMode = ModePuiss
Picture2.ScaleMode = Picture1.ScaleMode
For x = 0 To Picture1.ScaleHeight Step Nivo
For y = 0 To Picture1.ScaleWidth Step Nivo
Picture2.Line (x, y)-(x + Nivo - 1, y + Nivo - 1), Picture1.Point(x + Nivo - 1, y + Nivo - 1), BF
DoEvents
Next
Next
End Sub

Conclusion :


Il est tt a fait possible de metre 2x le mm picture !
merci de laisser vos commentaires et vos noes.... ;-)

A voir également

Ajouter un commentaire

Commentaires

Messages postés
207
Date d'inscription
mardi 10 février 2004
Statut
Membre
Dernière intervention
14 septembre 2011

Aucun flou, même pas besoins de tester le code, sa saute aux yeux tu étire les pixels...
Messages postés
363
Date d'inscription
jeudi 20 décembre 2001
Statut
Membre
Dernière intervention
25 août 2003

heu... c lent.... tres lent... mais as mal !!! tu devrais revoir tes projets avec les DIBSections... ca irait beaucoup plus vite et t'aurais une vitesse presque egale a celle de photoshop ! ;-)

$hîv@n
Messages postés
102
Date d'inscription
mercredi 11 octobre 2000
Statut
Membre
Dernière intervention
9 septembre 2003

cimer
Messages postés
19
Date d'inscription
dimanche 1 juillet 2001
Statut
Membre
Dernière intervention
20 octobre 2005

C'est pas trop mal.....;-)
Messages postés
12
Date d'inscription
mercredi 9 mai 2001
Statut
Membre
Dernière intervention
1 juin 2002

j'aurai plutôt intitulé la source : Pixelliser une image...

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.