Discussion :

[rodymary]

Bonjour,

J'esseye d'écrire un petit logiciel de dessin vectoriel en VB.NET (c'est en fait un soft que j'avais écrit en VB6 et qui tourne très bien ainsi d'ailleurs, très rapide, mais pour ma culture personnelle je souhaite le transposer en VB.NET)

L'objectif est d'utiliser les fonctionalités .NET pour ce qui est du graphisme, mais aussi et surtout de faire ça proprement en utilisant la POO.

En 2 mots, je souhaiterai créer une collection d'objets de types différents (des lignes, des cercles, des lignes de cotations, ...).

Pour celà, j'ai créé mes classes d'objets, avec leur caractéristiques propres, par exemple :

Code vb :

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

1
2
3
4
5
6
7
8
9
 
class_Line
  properties x1,y1,x2,y2
  method Draw
  ...
class_Circle
  properties xCentre,yCentre,Rayon
  method Draw
  ...

Ce que je ne sais pas, c'est lorsque ces objets ont des properties communes, par exemple la Couleur, ou l'Epaisseur du trait, ... dois-je les définir dans chaque classe, ou est-ce plus propre de définir une classe commune dont on pourrait en sorte hériter, et comment ?

Ensuite, pour grouper mes objets, j'ai créé une collection, ou plus précisément une ArrayList (d'ailleur est-ce la meilleur solution et la plus rapide ?) :

Code vb :

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

Dim myObjects As New ArrayList()

et j'y ajoute mes objets ainsi :

Code vb :

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

1
2
3
4
5
6
7
Dim newCircle As New class_Circle
With newCircle
  .xCentre = ...
  .yCentre = ...
  .Rayon = ...
End With
myObjects.Add(newCircle)

Donc déjà jusque là, suis-je à peu près ok ?

Ensuite, lorsque je veux par exemple tout redessiner, je fais ainsi :

Code vb :

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

1
2
3
4
5
6
7
8
For i As Integer = 0 To myObjects.Count - 1
  Select Case myObjects(i).GetType.Name
     Case Is = "class_Line"
       CType(myObjects(i), class_Line).Draw(.....)
     Case Is = "class_Circle"
       CType(myObjects(i), class_Circle).Draw(.....)
  End Select
Next

Là par contre, je sens que vous allez tiquer... utiliser CType pour accéder aux methods propre à chaque classe, je ne trouve pas ça génial, mais je ne sais pas comment faire autrement ?

Voilà, donc si vous avez la bonne marche à suivre, je suis preneur !

Merci d'avance !!!
Rod

[mathrb]

Désolé je ne pourrais répondre qu'à ta première question
il est clair qu'en utilisant la notion d'héritage ce sera plus propre et plus POO
Pour cela créer toi une classe avec les propriétés qui te semble communes
Ensuite tu fait un inherits dans ta classe ou tu veux t'en servir
et après tu définieras ta var ou ta propriété avec ta classe. Tu pourras toujours faire un overrides de ta propriété ou de ta méthode si il y a des choses qui changent.
Cela ne fait pas énormément de temps que je n'y suis mit, mais je le verrais plutôt comme ça. Mais je pense que si tu veux vraiment faire le la POO à fond avec ce type de projet, tu devrais te plonger un peu dans l'UML afin de voir comment vont s'agencer tes classes.
Sinon je ne comprends pas ce que tu veut dire par grouper tes objets, que veux tu faire avec ça?
Et pour le dernier point, si j'ai compris, tu accède aux méthodes de tes propres classes par un cType??
Alors là, si j'ai bien compris, c'est clair que ça reste en travers de la gorge!!
Quand tu as créer ta classe,as-tu créer un constructeur et un destructeur?
bref, tu fais un Dim NomObjet as Nomdetaclasse
et après tu obtiens toutes les méthodes et propriétés(propre à cet objet) en faisant : NomObjet.Nommethode ou nompropriete
Comme tu te servirais de la classe string
dim pidou as string = "blabla"
pidou.replace("a","i")
Bonne chance pour ton programme

EDIT: abandonne le WITH
c'est la même chose que ce que je viens de dire
dim moncercle as new classe_circle
moncercle.xcentre = mavaleur

[rodymary]

merci de ta réponse mathrb

effectivement c'est beaucoup plus propre ainsi :

j'ai créé une classe "commune" avec les propriétés et methodes communes, que j'ai Inherité dans mes classes d'objets (j'ai eu un peu de mal à saisir la nuance entre private et protected)

j'avais bien mis un constructeur New() mais je ne pensais pas qu'on pouvais y mettre des paramètres.... New(x1,y1, ...) c'est plus facile à utiliser

quand je parle de grouper, je veux dire créer une collection ou une arrayList qui contiendrait mes objets lignes, cercles, ... que j'aurais créé

merci en tout cas, j'avance...
rod

[olsimare]

Bonjour.

En lisant ce post, une question me vient.

Pourquoi stocker les objets dans un collection ? Il me semblerait plus judicieux d'abonner les controls a un évènement .

Exemple :

Code :

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

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
41
42
43
44
45
46
47
48
49
50
51
52
53
 
Public Class Form8
 
    Event redraw(ByVal g As Graphics)
 
    Public Sub New()
 
        ' Cet appel est requis par le Concepteur Windows Form.
        InitializeComponent()
 
        ' Ajoutez une initialisation quelconque après l'appel InitializeComponent().
 
        Dim c As New cercle(15, 15, 50, Color.Black, Color.Blue)
 
        AddHandler Me.redraw, AddressOf c.Draw
 
    End Sub
 
    Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
 
        RaiseEvent redraw(Me.CreateGraphics)
 
    End Sub
 
End Class
 
Public Class cercle
    Private wx As Integer
    Private wy As Integer
    Private wrayon As Integer
    Private wcolor1 As Color
    Private wcolor2 As Color
 
    Public Sub New(ByVal x As Integer, _
    ByVal y As Integer, _
    ByVal rayon As Integer, _
    ByVal color1 As Color, _
    ByVal color2 As Color)
        wx = x
        wy = y
        wrayon = rayon
        wcolor1 = color1
        wcolor2 = color2
    End Sub
 
    Public Sub Draw(ByVal g As Graphics)
        g.DrawEllipse(New Pen(wcolor1), New Rectangle(wx, wy, wrayon * 2, wrayon * 2))
        Dim c As Color
        c = wcolor1
        wcolor1 = wcolor2
        wcolor2 = c
    End Sub
End Class

A creuser peut être ...

Cdt.

[rodymary]

hello olsimare !

ouahou, là je suis largué, j'ai du mal à comprendre comment ça marche, mais ça marche ! ça m'a l'air très intéressant cependant, car c'est vrai que la manipulation d'une collection est très lente

par contre, peut-on naviguer parmis toutes les occurences ainsi créées, ou ne modifier qu'une instance en particulier ?

et aussi est-ce plus gourmant en utilisation mémoire que d'utiliser des classes, imaginons un dessin composé de 1000 cercles ?

as-tu un exemple d'appli un peu plus complète utilisant cette méthode ?

en tous cas merci, une autre piste s'ouvre à moi.....

a+
Rod

[olsimare]

Bonjour.

Par cette méthode, on cherche justement à éviter de naviguer entre les différents objets créés. Tout est fait dans l'objet lui même qui réagit à des sollicitations d'autres objets via des événements.

Si tu veux naviguer, tu ne pourras pas te passer de la gestion d'une collection.

Question performance, je ne connais pas la réponse, il faudrait bencher pour voir.

Et non, je n'ai pas d'exemple d'appli la dessus !

Si tu as vraiment beaucoup d'objets à gérer qui entraînent des problémes de perf, tu peux aussi creuser du côté du Flyweight (sous google on trouve pas mal de truc sur le sujet).

Cdt.