[R] Recherche d'une chaine et récupération de celle qui suit

[Stigmate]

Bonjours, le sujet à été traité plusieurs fois déjà j'en suis conscient, cela dit, chaque code étant différent, plus j'en lit et moins je comprend.
Je vous demande donc à nouveau de l'aide...
J'ai créé deux input.
Dans l'un j'écris un mot, dans l'autre apparait un mot correspondant au premier.
Pour cela j'ai créé un fichier txt qui se compose comme suit :

ratatouille = berk
frite = miam
ect...

Je veut que le mot que j'entre dans mon premier input (ex:ratatouille) soit cherché dans mon txt et que le mot correspondant (berk) soit inscrit dans mon second input.

J'ai trouvé les fonctions StringSplit et StringRegExp mais n'arrive pas a les utiliser car les cas présent sur le forum sont toujours sensiblement différent.

Pourriez vous me montrer la procédure s'il vous plait ?

[jbnh]

Salut.

Code : Tout sélectionner

#include <file.au3>
 
Dim $array
;-------------------------------------------
$filename = 'test.txt'
;-------------------------------------------

_FileReadToArray($filename, $array)
For $X = 1 to $Array[0]
    If StringInStr($array[$X], "bonjour") Then
       $var = FileReadLine($filename, $X)
     
       $var2 = stringsplit($var, "=")
       msgbox(0,'', $var2[2])
        
    EndIf
Next

Dans le cas par exemple où bonjour = coucou, $var2[2] ici retourne coucou.

A toi d'adapter le code pour ta GUI etc.

[Stigmate]

Merci beaucoup sa marche très bien !
En revanche peut tu me commenter un peu les lignes contenant les array et se $var2[2] pour que je puisse comprendre tous cela

[jbnh]

_FileReadToArray($filename, $array) va enfait transformer le fichier en array ou si tu veux, le diviser ligne par ligne.

For $X = 1 to $Array[0] ,If StringInStr($array[$X], "bonjour") Then pour chaque ligne ( la 1 jusqu'a la dernière), on va chercher avec StringInStr "bonjour" dans la ligne.

$var = FileReadLine($filename, $X), $var2 = stringsplit($var, "=") si on trouve, on lit la ligne entière et on divise la ligne avec le "=", on obtient donc les deux éléments des deux cotés, bonjour et coucou

$var2[2], coucou vient en deuxième, d'où il constitue le deuxième élément de la variable $var2

Voilà

[Stigmate]

Super, s'est très claire, merci beaucoup jbnh.

Oops une dernière petite question, récupérer les valeurs d'un input s'est simple, mais je ne sais pas en envoyer.
J'ai trouvé "GUICtrlSendMsg ( controlID, msg , wParam, lParam )"
Me semble il que cela peut faire l'affaire, mais je ne comprend pas quoi mettre a "wParam" et "IParam".
Peut tu m'éclairer s'il te plait ?

[jbnh]

Que veut tu dire par envoyer ? Mettre à jour l"info dans l'input ? Si oui, utiliser GUICtrlSetData

[Stigmate]

Oui s'était sa. Tout fonctionne impeccable.
Encore merci a toi.

[Stigmate]

Salut, s'est encore moi
J'ai peut être parlé un peu vite, tout était parfait jusqu'a... se que je trouve les imperfections
j'explicite :
Si j'ai deux mots comme ceux ci :

une ratatouille = berk

Si je tape "une" ou bien "rata" j'obtient le résultat après le "=" , se que je ne veut pas.
Je veut obtenir berk uniquement si j'ai le groupe de mot "une ratatouille" en entier.

Quelle solution pourrais-je adopter ?
Peut être en comptant le nombre de lettre du mot entré et en comparant se nombre avec le nombre de lettre du mot de la liste...

[jbnh]

Salut

En imaginant que la variable recherchée soit : Guictrlread($input), ca donnerait :

Code : Tout sélectionner

 _FileReadToArray($filename, $array)
For $X = 1 to $Array[0]
    If StringInStr($array[$X], Guictrlread($input)) Then
       $var = FileReadLine($filename, $X)
     
       $var2 = stringsplit($var, " =")
       If Guictrlread($input) =  $var2[1] Then
       msgbox(0,'', $var2[2])
       Endif
        
    EndIf
Next

Attention j'ai changé le stringplit ($var, "=") en ($var, " =")

Dis moi quoi. Si ça marche pas hésite pas a poser ton script entier.

[Tlem]

Une solution qui serait plus simple, serait de gérer le fichier txt comme un fichier .ini.
Donc il faudrait rajouter une balise ([CommeCeciParExemple]) en début de fichier et d'utiliser les fonction de lecture IniRead.

[Stigmate]

Oula je m'étais beaucoup compliqué la tache, il me manque encore quelques automatismes
J'avais doublé la longueur du code pour arriver au même résultat, en employant 2 fichiers txt
Mais bon sa m'a permit de comprendre comment fonctionnait les array

En changeant le StringSplit comme ceci : ($var, " =") , le code ne m'affiche pas toujours se qu'il faut.
Au final j'opte donc pour ceci, en enlevant les espaces dans mon fichier txt entre les mots et le "=" .
Cela nui un peu à la lisibilité dans le fichier txt mais tans pis

Code : Tout sélectionner

_FileReadToArray($filename, $array)
For $X = 1 to $Array[0]
    If StringInStr($array[$X], Guictrlread($input)) Then
       $var = FileReadLine($filename, $X)
     
       $var2 = stringsplit($var, "=")
       If Guictrlread($input) =  $var2[1] Then
       msgbox(0,'', $var2[2])
       Endif
       
    EndIf
Next
 

Merci jbnh !

- Concrètement en quoi la gestion comme dans un fichier ini me simplifi la tache ?
Que je sache si sa vaut vraiment la peine que je me casse la tête dessuite ou si je peut encore attendre un peu

- Encore une petite question, je me rend compte au final que les array sont bien pratique, dans un fichier on utilise _FileReadToArray , qu'utilise t'on pour lire dans un array une valeur entré dans une input (sans passer par un fichier)? La même chose ?

[jbnh]

Salut,

Pour les fichiers INI, je t'invite à faire des cherches sur le forum et lire la documentation ici en cherchant tout ce qui commence par ini.

Pour ta deuxième question, tu pourrais éventuellement faire comme suit :

Code : Tout sélectionner

$line = StringSplit(GuiCtrlRead($input), @CR)
For $i = 1 To $line[0]
;Les actions ici s'appliqueront pour chaque ligne
Next

Le stringsplit divise ici ton input qui a plusieurs lignes en lignes séparées.

[Tlem]

L'utilisation du fichier au format fichier ini vous simplifiera grandement la tâche, car plus besoin de lire le fichier dans un tableau et de faire du StringSplit pour récupérer la valeur après le = ...
De plus la lecture se fera sur la chaîne exacte et non sur une partie de la chaîne.
Testez et voyez la simplicité d'utilisation.

[Stigmate]

Sa a l'air effectivement plus simple j'essayerais donc le ini la prochaine fois =)

[Iste]

Au lieu des INI (limités), je te conseil tout de suite de passer à ces fontions, qui "imitent" la gestion d'ini, mais avec moins de probleme (je dis ca surtout si tu veux depasser les 64ko de donné, ce qui est assez vite fait dans certain cas)

http://www.autoitscript.com/forum/index ... ntry371817
Merci à Tlem pour le lien

[Stigmate]

Oui en effet mon fichier risque de prendre très rapidement du volume étant donné que s'est un dictionnaire =)
Merci pour l'infos !

Stig.