Discussion :

[glandu.dulac]

Bonjour,

Je suis en train de porter un programme VB.Net sous Delphi, je rencontre une difficulté concernant la hiérarchie des objets. Je tente une explication :

Mon programme .Net contient une classe Objet "Cube" et une classe coCubes collection de "Cube".

Parmi ses propriétés La classe Objet "Cube" compte également la classe coCubes, ça donne quelque chose du genre :

Code vb.net :

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
 
public class clsCoCubes
 Private mcol As New SortedList(Of String, clsCube)
end class
 
Public Class clsCube
    private myCoCubes as clsCoCubes
 
    Public Property coCubes() As clsCocubes
        Get
            coCubes= myCoCubes 
        End Get
        Set(value As clsCoCubes)
            myCoCubes = value
        End Set
    End Property
end class

La même chose en Delphi (présentation simplifiée) ne fonctionne pas :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Unit unitCube;
...
Interface
   type TCube=class
     myCubes:TCubes;
   end;
 
  type
    TCubes= class(TDictionary<string, TCube>)
    end;
...

Quelqu'un connaîtrait une solution ?

Merci !