[R] Problème avec ma TreeView

[Ks10]

Bonjour

Voici la structure du programme et le résultat que je veut :
- J'entre mes données dans une treeview
- Elle est écrit dans un fichier texte
- Lorsque je quitte le programme et que je le relance, mon programme lit le fichier texte et reporte les données dans la TreeView sauf que voila lorsque celui-ci s'affiche il garde tout sur la même ligne et ne liste plus...

Voici ce que sa donne :

Ceci c'est entrant les données :

Code : Tout sélectionner

- Test1 
- Test2
- Test3

Et sa c'est quand je ferme et relance le programme :

Code : Tout sélectionner

- Test1 - Test2 - Test 3

Et voici le code que j'utilise pour lister mes lignes dans la treeview :

Code : Tout sélectionner

Global $file2 = FileOpen(@ScriptDir & "\xxx.ini"), $ligne2, $data2

While 1

    $ligne2 = FileReadLine($file2)
    If @error = -1 Then ExitLoop
    $data2 &= $ligne2 & @CRLF


    WEnd

FileClose($file2)

GUICtrlCreateTreeViewItem($data2 & @CRLF, $TreeView1)

Merci d'avance =) (Je dois vous souler avec toutes mes questions lol)

[Nagroxx]

Bonjour,

Tu as essayé un FileWriteLine ?
"FileWriteLine($data2,$ligne2)"

[Ks10]

Bonjour,

Tu as essayé un FileWriteLine ?
"FileWriteLine($data2,$ligne2)"

Essayé ou sa ?

[Nagroxx]

A la place de ton $data2 = $ligne2 & @CRLF


Le but de ton script c'est quoi?

[Ks10]

Voici la structure du programme et le résultat que je veut :
- J'entre mes données dans une treeview
- Elle est écrit dans un fichier texte
- Lorsque je quitte le programme et que je le relance, mon programme lit le fichier texte et reporte les données dans la TreeView sauf que voila lorsque celui-ci s'affiche il garde tout sur la même ligne et ne liste plus...

Je l'est précisé dès le début du message le but de mon programme x)

[Nagroxx]

Oui je sais merci mais ça en dit pas beaucoup et le code que tu as laissé ne fonctionne pas d'où ma question.

[Ks10]

C'est normal qui ne fonctionne pas ... c'est pas le programme entier.
Ce que j'ai fournit comme code c'est uniquement la partie qui liste les données qui se trouve dans le .ini et qui les affiches dans la treeview lorsque je relance le programme.

J'ai fournie tous les élements nécessaire à la compréhension de mon problème.
Et si justement les informations que j'ai laisser dit tous ce qu'il y a à savoir , la source du problème & le résultat que je veut obtenir.

[Nagroxx]

Ouais bah essais FileWriteLine moi pour mon programme ça fonctionne parfaitement

[Ks10]

Le résultat reste inchangé pour moi.
Il liste toujours comme sa quand je relance le programme :

Code : Tout sélectionner

- Test1 - Test2 - Test3

[Nagroxx]

Le mieux c'est d'établir des tests.

je pense notamment à dire que ton $data2 n'est pas juste une variable mais un emplacement du genre ($data2="c:\test.txt") et donc de regarder ton fichier texte comment il se présente. S'il se présente sur 3 lignes c'est que ton problème vient d'ailleurs!

[Ks10]

Le mieux c'est d'établir des tests.

je pense notamment à dire que ton $data2 n'est pas juste une variable mais un emplacement du genre ($data2="c:\test.txt") et donc de regarder ton fichier texte comment il se présente. S'il se présente sur 3 lignes c'est que ton problème vient d'ailleurs!

No justement ma variable $data2 ne correspond à aucun chemin.
Il est appelée uniquement dans cette partie :

Code : Tout sélectionner

    $ligne2 = FileReadLine($file2)
             If @error = -1 Then ExitLoop
             $data2 &= $ligne2 & @CRLF

[Nagroxx]

Oui j'ai vu mais modifie un peu pour pouvoir vérifier en ouvrant le fichier si ça a bien écrit ligne par ligne. Si c'est le cas alors le problème ne vient pas de la partie que tu as mise ici.

[Ks10]

J'ai bien vérifier... relie plus haut, j'ai bien fait la différence entre ce qui est écrit dans le fichier, le résultat que je veut & je résultat obtenue.

[mikell]

Si tu envoies une string avec des @crlf dans un GUICtrlCreateTreeViewItem, ça ne liste pas, faut faire des items séparés

► Afficher le texte

Code : Tout sélectionner

GUICreate("My GUI with treeview", 350, 215)
$treeview = GUICtrlCreateTreeView(6, 6, 100, 150)

$txt = "a" &@crlf& "b" &@crlf&"c" 
GUICtrlCreateTreeViewItem($txt, $treeview)

GUICtrlCreateTreeViewItem("a", $treeview)
GUICtrlCreateTreeViewItem("b", $treeview)
GUICtrlCreateTreeViewItem("c", $treeview)
GUISetState()

While GUIGetMsg()<>-3
WEnd

donc en bonne logique ton code devrait être comme ça

Code : Tout sélectionner

While 1
    $ligne2 = FileReadLine($file2)
    If @error = -1 Then ExitLoop
    GUICtrlCreateTreeViewItem($ligne2, $TreeView1)
WEnd

[Ks10]

Merci de m'avoir répondu Mikell.

Donc en faite je ne peut pas faire des items séparés parce que c'est pas moi qui liste les items mais le programme grâce à cette commande :

Code : Tout sélectionner

        Case $Button2
                $file2 = FileOpen("TDL.ini", 1)
                $todo = InputBox("blabla...", "blablabla :")
                GUICtrlRead($todo)
                FileWriteLine($file2, $todo)
                GUICtrlCreateTreeViewItem($todo, $TreeView1)

Donc a chaque fois que je clique sur ce bouton, je rentre mes données, j'appuie sur entrée et il crée une ligne.

Quand je quitte mon programme et que je le relance, il lit le fichier texte et liste ce qu'il contient.

[mikell]

Pour l'entrée des données et l'écriture

Code : Tout sélectionner

Case $Button2
      $file2 = FileOpen("TDL.ini", 1)
      $todo = InputBox("blabla...", "blablabla :")
      FileWriteLine($file2, $todo)
      FileClose($file2)
      GUICtrlCreateTreeViewItem($todo, $TreeView1)

Pour la lecture à l'ouverture du programme

Code : Tout sélectionner

$file2 = FileOpen("TDL.ini", 0)
While 1
    $ligne2 = FileReadLine($file2)
    If @error = -1 Then ExitLoop
    GUICtrlCreateTreeViewItem($ligne2, $TreeView1)
WEnd
FileClose($file2)

Qu'est-ce que je peux te dire de plus ?

[Ks10]

Yes ! Sa fonctionne maintenant, je voulais être sur qu'on n'était bien sur la même longueur d'ondes Merci tout le monde et surtout Mikell qui a résolue mon problème.