bonjour

j'ai un pb avec la creation d'un objet;

voici le code, pouvez-vous me dire le problème:

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
 
 
    TObjetB= CLass
        Private
        Published
        Public
            Constructor OpenObjetB;
            Destructor  CloseObjetB;
    End;
 
    TObjetA= CLass
        Private
        Published
        Public
            Constructor OpenObjetA;
            Destructor  CloseObjetA;
    End;
 
 
    TObjetC= CLass
        Private
            FObjetA : TObjetA;
            Function GetObjetB(NumObj: Integer): TObjetB;
            Procedure SetObjetB(NumObj: Integer; Value: TObjetB);
        Published
            Property LObjetA: TObjetA Read FObjetA Write FObjetA;
            Property LObjetB[NumObj:Integer]  : TObjetB Read GetObjetB Write SetObjetB;
        Public
            Constructor OpenObjetC;
            Destructor  CloseObjetC;
    End;

message d'erreur a la complilation
LObjetB ne peut pas etre de type array

merci