Discussion :

[dederfred]

Bonsoir me voila confronté à un Bug encore une fois.
Je viens de déclarer :

CB_Plancher: Array Of TComboBox ;
et
Num:Integer =0 ;

Pour chaque nouvelle page de mon TTabbedNotebook j'insère un
combobox. Je suis obliger de faire cela pour récupérer après ce que contient le combobox.
Je vous mets un screen du message d'erreur que me met Delphi :

Code non fonctionnel :

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
 
CB_Plancher[Num] := TComboBox.Create(Self);
                With CB_Plancher[Num] do
                    Begin
                    Parent := TabPage ;
                    Top :=  50  ;
                    left := 400  ;
                    Font.Size := 10 ;
                    Items.Add( 'béton' );
                    Items.Add( 'parquet' );
                    Items.Add( 'moquette' );
                    Items.Add( 'linoléum' );
                    Items.Add( 'carrelage' );
                    Items.Add( 'dalles de sol' );
                    Items.Add( 'bois' );
                    Items.Add( 'marbre' );
                    Items.Add( 'laine de verre' );
                    Items.Add( 'terre battue' );
                    End;

Dans le cas ou je remplace et que je remet tout entant que combobox simple tout fonctionne.
Code:
Avec CB_Plancher: TComboBox ;

Code fonctionnel :

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
 
CB_Plancher := TComboBox.Create(Self);
                With CB_Plancher do
                    Begin
                    Parent := TabPage ;
                    Top :=  50  ;
                    left := 400  ;
                    Font.Size := 10 ;
                    Items.Add( 'béton' );
                    Items.Add( 'parquet' );
                    Items.Add( 'moquette' );
                    Items.Add( 'linoléum' );
                    Items.Add( 'carrelage' );
                    Items.Add( 'dalles de sol' );
                    Items.Add( 'bois' );
                    Items.Add( 'marbre' );
                    Items.Add( 'laine de verre' );
                    Items.Add( 'terre battue' );
                    End;

merci de vos conseil .

[qi130]

Quand affectes-tu la dimension de ton Array ?