[Gambas-user] PB avec un ToolPanel

[Olivier Cruilles]

Bonsoir Benoit,

Continuant toujours le développement de mon application, je créer a la  
volée dans un ToolPanel (fixe)
d'un formulaire des TreeView.

J'obtiens donc une collection contenant l'adresse Objet de chaque  
TreeView.

Je place chaque TreeView sur des ToolBar différent   (Ex: 3 Treeview  
donc ToolPanel1.count = 3)

Par la suite, je veux pouvoir detruire tous les TreeView crées  
précédemment, ramener le ToolPanel1.count = 1 et
recréer de nouveau TreeView.

Or je n'arrive pas à detruire les TreeView.

Voila ce que j'ai codé pour détruire le TreeView:


DIM ToolPanelChildrenIndex AS integer

PRINT "ToolPanel1.Children.Count = " & ToolPanel1.Children.Count

  IF ToolPanel1.Children.Count > 0 THEN
    FOR ToolPanelChildrenIndex = 0 TO (ToolPanel1.Children.count - 1)
      PRINT "ToolPanel1.Children[ToolPanelChildrenIndex] = " &  
Str(ToolPanel1.Children[ToolPanelChildrenIndex])
      Object.Detach(ToolPanel1.Children[ToolPanelChildrenIndex])
      ToolPanel1.Children[ToolPanelChildrenIndex].Delete
    NEXT
  END IF

  ToolPanel1.Count = 1

Merci d'avance pour votre réponse.


Olivier Cruilles
Mail: linuxos at ...1896...