1. Accueil
  2. Visual Basic / VB.NET
  3. Sources Visual Basic / VB.NET
  4. Sources Graphique
  5. Fractalis 4 : algo. de remplissage et poo en vb .net

Fractalis 4 : algo. de remplissage et poo en vb .net

Soyez le premier à donner votre avis sur cette source.

Vue 11 025 fois - Téléchargée 620 fois

Télécharger le projet
Commenter

Description

Est-il encore besoin de présenter les ensembles fractals de Mandelbrot ? à partir de l'équation Z -> Z^2 + C, on peut créer une infinité d'images fantastiques, qui possèdent des propriétés d'autosimilarité et d'invariance d'échelle : Z et C étant des nombres complexes, on compte combien d'itérations sont nécessaires pour sortir du cercle unitaire, c'est tout !

Mode d'emploi : zoomer sur l'image en sélectionnant une zone :-)

Version 4.0 : Algo. de remplissage (réutilisable en analyse ou traitement d'images), Mode Détail des itérations (cf. copie d'écran), Programmation orientée objet (POO).

Version 3.0 : Z -> Z^degré + C avec degré entre 2 et 5, ensembles de Julia (voir la copie d'écran), panneau de configuration, bitmap de cache en option, zoom -, thread pour tracer, sélection améliorée.

J'ai plusieurs améliorations de prévues pour ce logiciel, la dernière étape étant la création de films fractals en DivX !
Voir : VBDivX : Faire un film de synthèse en DivX image par image en VB :
www.vbfrance.com/article.aspx?Val=5687

Source / Exemple : 


Call ClickOnTheZip();

Conclusion :


Note : pour ceux qui n'ont pas Visual Studio .NET, l'exécutable de Fractalis est inclut dans le fichier zip (reste le framework .NET à télécharger : 20 Mo, cf. doc.)

à suivre...

Par Patrice Dargenton : patrice.dargenton@free.fr
http://patrice.dargenton.free.fr/fractal/index.html
http://patrice.dargenton.free.fr/index.html
Télécharger le projet

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Signaler
Messages postés
467
Date d'inscription
lundi 24 juin 2002
Statut
Membre
Dernière intervention
9 mars 2011
de rien :)
Signaler
Messages postés
1221
Date d'inscription
jeudi 23 août 2001
Statut
Membre
Dernière intervention
9 septembre 2018
Merci, mais je suis en train de corriger cette source et j'ai tout simplement enlevé les thread, car dans plusieurs bouquins j'ai trouvé que les thread était déconseillés avec le GDI (alors que pourtant c'était une démo d'animation multithread en GDI qui m'avais donnée l'idée d'utiliser les threads). Au final, les threads ne servent à rien du tout ici, un simple DoEvents à intervalle régulier suffit à traiter les événements de l'interface, et cela marche parfaitement maintenant (c'est vrai qu'en DotNet2, le bug du thread devient problématique, mais cela n'apparaissait pas en DotNet1).
Mais je suis en train aussi de deboguer un système qui combine en POO les QuadTree et l'algo de remplissage de façon à tracer plus rapidement les fractales, mais il y a encore un petit bug de précision (anomalie des pixels), à suivre donc.
Signaler
Messages postés
467
Date d'inscription
lundi 24 juin 2002
Statut
Membre
Dernière intervention
9 mars 2011
protection thread safe a rajouté (quand je click droit pour le panneau de reglage ca plante) :

dans le fichier =>FrmConfig.vb :

Public WriteOnly Property iAvancement%()
...Set(ByVal iVal%)
......Me.pbAvancement.Value = Math.Min(iVal, 100) ' pb : ProgressBar
...End Set
End Property

===================A remplacer par ====================
Public WriteOnly Property iAvancement%()
...Set(ByVal iVal%)
......SetpbAvancementValue(iVal)
...End Set
End Property

Private Delegate Sub SetpbAvancementValueCallBack(ByVal iVal%)

Private Sub SetpbAvancementValue(ByVal iVal%)
...If Me.pbAvancement.InvokeRequired Then
......Dim dlg As New SetpbAvancementValueCallBack(AddressOf SetpbAvancementValue)
......Me.Invoke(dlg, New Object() {iVal})
...Else
......Me.pbAvancement.Value = Math.Min(iVal, 100) ' pb : ProgressBar
...End If
End Sub



(dsl pour les "." je me rapelle jamais si il vire les espace tout seul ou pas)
Signaler
Messages postés
1221
Date d'inscription
jeudi 23 août 2001
Statut
Membre
Dernière intervention
9 septembre 2018
Pour info, Fractalis est actuellement mon seul logiciel .Net dont le bytecode fonctionne tel quel sous Mono (donc sous linux !), affaire à suivre pour mes autres logiciels...
www.go-mono.com/archive/1.1.8/windows/mono-1.1.8-gtksharp-1.9.5-win32-0.0.exe
Signaler
Messages postés
192
Date d'inscription
vendredi 2 mars 2001
Statut
Membre
Dernière intervention
10 janvier 2006
kool sympa comme code je vais le prendre comme base pour voir a quoi ressemble le VB.net, ca me tente bien, mais le probleme c'est que j'ai windows 98 SE et que le SDK ne fonction pas sur ce systeme! Donc passage obligé a 2000! M'enfin! Mandelbrot je l'ai vu en vrai, a une conférence, chouette gar bien sympa! ;)
Afficher les 7 commentaires
S'inscrire maintenant

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.

Du même auteur (cs_Patrice99)