PureBasic

Bonjour à tous,

Javais déjà réaliser un module TreeView (en 2015). Comme j'en avais besoin pour un projet, je me suis rendu compte que le module était assez lourd à l'utilisation.

J'ai don réaliser un nouveau module (full oop), et beaucoup plus facile d'utilisation.

Vers Github
Download
Wiki User manual

History of version :

Beta 6 -> fixed ->some bugs
Beta 7 -> added -> enableDragEvent(target)
Beta 8 -> fixed -> tree\free()

Exemple :

Comment tester :

Ouvrer votre éditeur PureBasic.
Sauvegarder et lancer le code ci-dessous.
Donner votre accord pour télécharger le package.
Ouvrer le fichier EXAMPLE/main.pb
Exécuter le fichier
Ou dé-commenter la dernière ligne et relancer le fichier

Code : Tout sélectionner

; ******************************************************************************
; AUTHOR  : MicrodevWeb
; MODULE  : TreeView
; PROCESS : load package
; ******************************************************************************
EnableExplicit
Procedure loadPackage()
  Protected zipName.s = "PACKAGE.zip"
  If MessageRequester("Download Package","Do you agree to download the tree view package form github?",#PB_MessageRequester_YesNo) = #PB_MessageRequester_No
    End
  EndIf
  If Not InitNetwork()
    MessageRequester("Network error","Cannot connect to internet",#PB_MessageRequester_Error) 
    End
  EndIf
  If Not ReceiveHTTPFile("https://github.com/microdevweb/PB_TREE_VIEW_3.0/archive/master.zip",zipName)
    MessageRequester("Download error","Cannot download the package",#PB_MessageRequester_Error) 
    End
  EndIf
  #PACKER = 0
  CreateDirectory("TREE")
  CreateDirectory("TREE/CLASS")
  CreateDirectory("TREE/IMG")
  CreateDirectory("EXAMPLE")
  CreateDirectory("EXAMPLE/IMG")
  UseZipPacker()
  OpenPack(#PACKER,zipName)
  If ExaminePack(#PACKER)
    While NextPackEntry(#PACKER)
      Protected dirName.s = StringField(PackEntryName(#PACKER),2,"/")
      If PackEntryType(#PACKER) = #PB_Packer_File
        Protected fileName.s = RemoveString(PackEntryName(#PACKER),"PB_TREE_VIEW_3.0-master/")
        If Not UncompressPackFile(#PACKER,fileName)
          MessageRequester("Download error","Cannot unzip file "+fileName,#PB_MessageRequester_Error) 
          End
        EndIf
      EndIf
    Wend
  EndIf
  ClosePack(#PACKER)
  DeleteFile(zipName)
EndProcedure

loadPackage()

;XIncludeFile "EXAMPLE/main.pb"

Salut microdevweb,

Ce serait bien si tu pouvait nous faire un exemple complète sur ce que peut faire ton code.

Marche nickel, la détection du cochage de la checkbox ne génère rien dans le debug mais ce doit être voulu

Merci du partage

Version Beta 2

add : class button

new Version Beta 3

Add : scroll area activate when you resize the container

new Beta 4

added : tree\removeItem(item)

Hello guys,

It's upgrade to beta 5.

Added : some methods for personalize your treeview.

setColors(back,front,line)
setSelectedColors(back,front)
setTolltipColors(back,front)
setExpandedIcons(expanded,collapsed)
setCheckedIcons(checked,unChecked)

Fixed : some bugs

C'est bien ça prends forme, cool, merci, continue

As tu l'idée de gérer le drag en drop ?
Car là tu va t'amuser mon ami ^^

@Shadow,

Oui le drag and drop sera géré et cela devrait aller cela fonctionnait dans l'ancienne version.

Beta 6 is out

Beta 7 is out

added enableDragEvent(target)

Je voulais vérifier, mais Mac OS ne fonctionne pas.

@mestnyi,

Je ne possède pas de mac, je ne saurais donc pas te dire. Cependant aucune fonction spécifique à window n'est utilisée.

Code : Tout sélectionner

premier problème
from > XIncludeFile "..\TREE\TREE.pbi"
to > XIncludeFile "../TREE/TREE.pbi"
deuxième problème
.l to.i
Troisième problème
.ico

@mestnyi,

Merci pour ses informations.

PureBasic

Pb Tree view (version 3.0 beta 8)

Pb Tree view (version 3.0 beta 8)

Re: Pb Tree view (version 3.0 beta 1)

Re: Pb Tree view (version 3.0 beta 1)

Re: Pb Tree view (version 3.0 beta 2)

Re: Pb Tree view (version 3.0 beta 3)

Re: Pb Tree view (version 3.0 beta 4)

Re: Pb Tree view (version 3.0 beta 4)

Re: Pb Tree view (version 3.0 beta 5)

Re: Pb Tree view (version 3.0 beta 5)

Re: Pb Tree view (version 3.0 beta 6)

Re: Pb Tree view (version 3.0 beta 7)

Re: Pb Tree view (version 3.0 beta 7)

Re: Pb Tree view (version 3.0 beta 7)

Re: Pb Tree view (version 3.0 beta 7)

Re: Pb Tree view (version 3.0 beta 7)