Probleme d'interprétation d'un script

Bonjours !! Je suis confronté a un petit probleme, qui je pense peut trouver solution au cotés de la communauté :)
Je créé une application qui enregistre les click souris,les déplacements de la souris, ainsi et les touche du clavier numérique, et j'enregistre tout ca dans un Tmémo.
jusqu'ici aucun probleme, voici ce que cela me donne lorsque l'application est lancée :

Code:

---

1 2 3 4 5 6

<Pad Num> Temps: 10 Click Pad Numérique 4: X:678 Y:280 <Souris> X: 678 Y: 280 <Souris> X: 683 Y: 279 <Souris> X: 684 Y: 279 <Click>Temps: 40 Click bas gauche X:678 Y:280

---

nous avons donc une premiere balise qui informe sur l'information enregistrée[<Click>;<Souris>;<Pad Num>) et differentes informations telles que le temps entre les deux derniers clicks, le tyope de click (pression, relachement, droit, gauche...) et bien entendu les coordonnée...

le but de mon application étant d'etre un planificateur de tache avec script modifiable a souhait par l'utilisateur,, il est donc indispensable je pense d'avoir un script visible et facile a comprendre...
Cependant, et la est mon probleme, je ne sais pas comment "lire" les scripts;

en les enregistrant tel quel (ce qui serait de loin le plus simple) je ne sais pas comment interprété les lignes.
J'arrive a differencier toutes les lignes differentes[<Click>;<Souris>;<Pad Num>] avec des comparaisons de chaine (j'utilise copy(...) ) mais pour le reste, c'est a dire récupérer les informations, j'ai des problemes, comment récupérer les valeurs numériques?
Quand j'essaye avec Copy cela me pose probleme car la longeur de la chaine est differente selon ce que l'on a enregistré, par exemple avec

Code:

---

1 2	<Click>Temps: 40 Click bas gauche X:678 Y:280

---

Danc ce cas, la valeur de X et de Y n'est pas placé identiquement selon que l'utilisateur soit en 1000 ou en 600 (un caractere de plus...)

J'espere avoir été assez explicite sur la nature de mon probleme, qui je pense trouvera facilement solution auprés de delphiste expérimentés 8-)

Merci!

NB: J'ai pensé laisser le script pour l'affichage et enregistrer tout ca sous forme de Record, mais ca serait trop lourd a gerer lors de la modification des script...

Je te conseillerais de prendre une norme qui existe déjà et d'écrire en fonction de cette norme.

Par exemple avec la norme des .ini, mais c'est peut être pas le plus adéquat.

Sinon tu as le XML !, il faut que tu mettes un flag de fin.

Ensuite, tu prends un composants capable de lire le XML pour relire et interpréter ton script.

L'écriture est simple, tu écris ce que tu veux, l'objectif c'est d'utiliser un outils existant pour relire le script.

Bon courage !

Bonjour,

Pour ce type de données, je te propose une structure du type :

Code:

---

1 2 3 4 5

Action=Pad Num,Temps=10,Click="Pad Numérique",key=4,X=678,Y=280 Action=Souris,X=678,Y=280 Action=Souris,X=683,Y=279 Action=Souris,X=684,Y=279 Action=Click,Temps=40,Click="bas gauche",X=678,Y:280

---

Attention aux blancs et virgules, voir la propriété commaText dans l'aide delphi

A lire ligne par ligne [readln] ou globalement avec une tstringlist.
A traiter ensuite ligne par ligne ainsi :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

var Allmylines,mysingleLine : Tstringlist ; action,X:string ; ... Allmylines.loadfromfile(nom_de_fichier) ; for i :=0 to Allmylines.count-1 do begin mysingleline.commatext:=Allmylines[i] ... action:=mysingleline.values('Action') ; X:=mysingleline.values('X') ; ....

---

Merci de vos reponses! J'ai modifié mon script, il donne ceci :

Code:

---

1 2 3 4

<Type="Souris" Temps="/" Action="/" X="662" Y="303"> <Type="Click" Temps="10" Action="Bas Gauche" X="663" Y="299"> <Type="Pad Num" Temps="10" Action="Pad Numérique" X="663" Y="299">

---

Ce code est bien plus facile a traiter, je me suis simplement inspiré du HTML, et ca marche trés bien :)

Merci!