lecture port serie tcomport

Version imprimable

Voir 40 message(s) de cette discussion en une page

Re,
Ta trame est affichée dans un TEdit (texte de type AnsiString), à partir de là il faut faire le découpage, voici un exemple:
Code:

1 2 3 4 5 6 7 8 9 10 11 //recopie de la trame dans le Edit1 Edit1->Text = "153014-02173847 403100100F10619181428 00\'12\" 3B0040101 00023084"; AnsiString Trame = Edit1->Text; Edit2->Text = Trame.SubString(1,4);//prend les 4 premiers caractères (le n°) Trame.Delete(1,4);//supprime les caractères lus Edit3->Text = Trame.SubString(1,5);//prend les 5 suivants (la date) Trame.Delete(1,5); Edit4->Text = Trame.SubString(1,6);//prend les 6 suivants (l'heure) Trame.Delete(1,6);
Tes bloques seront toujours de taille fixe? si oui la méthode fonctionnera tout le temps, sinon il faut savoir ce que défini la taille.

20/02/2007, 11h28
thibautlelevier

ça fonctionne... jusqu'a un certain point...
je peut sans problème récupérer la date, l'heure, le poste appelant et le numéro mais la taille des trames n'es pas fixe, donc ça ne marche pas à chaque fois...
par exemple le numéro peut être plus cour (exemple 118 218 ne fait pas 10 caractères) et la durée de l'appel peut être plus longue (si on dépasse une heure on passe alors de 6 à 9 caractères)

la taille des 2 dernière trames est fixe et je peut de toute façon les virées
car elle ne me servent pas.
y a t'il moyen de venir récuperer des données en partant de la fin?

autre problème, lors de l'émission de plusieurs appels... celà arrive à la fin du Edit1.
ce n'est pas vraiment un problème car à la fin, mon programme envera directement tout dans une bases de données
on vera à ce moment là :)

merci
tibo
20/02/2007, 13h28
bandit boy
Bien sur, on peut commencer par la fin en utilisant la méthode AnsiString.Length() qui renvoie la taille de la chaine:
Code:

1 2 AnsiString SixDernierCar = Trame.SubString(Trame.Length()-5,6);
Tu peux faire pareil pour les supprimer, sinon il existe aussi la méthode .Pos qui te permet de connaître la position d'une chaine ou d'un caractère dans ta chaine.

Je ne comprend pas "celà arrive à la fin du Edit1" ? tu affiches tout dans un seul TEdit, les trames les unes à la suite des autres ? Autant les afficher dans un TMemo, tu les stockera ligne par ligne.
20/02/2007, 14h55
thibautlelevier

Oubli l'histoire du Edit1, c'est une histoire de passage de ligne.
j'essai juste pour l'instant de récuperer mes variables, on vera la suite après.

j'ai essayer de virer les 30 dernier caractères (les 2 dernier blocs plus les espaces entre le 3 et le 4ème bloc) pour simplifier ma trame mais ça ne marche pas:

Code:

trame.Delete(trame.Length()-30,30);

mais ça me donne rien...

il y a aussi 12 espace entre le numéro et la durée de l'appel (bloc 2 et 3).
je me demande si lorsque ça passe à plus d'une heure, les 3 caractère en plus (01h) ne prennent pas sur ces espace...

n'y a t'il pas un moyen plus simple de faire en sorte qu'il reconnaisse chaque bloc sans tenir compte de la taille qu'elle font mais des données qu'elle contiennents?

A+
merci
tibo
20/02/2007, 17h00
bandit boy
sit tu fais le code suivant:
Code:

1 2 3 4 Edit1->Text = trame; trame.Delete(trame.Length()-29,30); Edit2->Text = trame;
Je pense que ca dois changer et bien supprimer les 30 derniers caractères.

Il faut se poser la bonne question pour le découpage de tes bloques: Comment sont ils définis ? dans la définition du protocole n'y a t il pas plus d'information ?
20/02/2007, 19h21
thibautlelevier

j'ai entrer ce que tu as marqué dans ton post précedant mais ça a fait l'effet inverse: ça a garder que ce que je voulais supprimer.

pour ce qui est de la trame, voiçi comment une trame ce compose:
-premier bloc
-tout d'abord 4 chiffres qui constitue le numéro de l'appel dans le compteur du PABX. ici ces données ne m'interessent pas.
-ensuite je jour en 2 chiffres, un tiré, et le mois en 2 chiffres
-puis 2 chiffres pour l'heure, 2 pour les minutes, et 2 pour les secondes

-2ème bloc
-les 3 chiffres du poste interne qui passe l'appel
-8 caratères dont je ne connait pas la signification et que je n'utilise pas
-les chiffres du numéro appel: peut varié en fonction du numéro qu'on appel

-3ème bloc
-la durée de l'appel: dans tous mes exemple mm'ss" mais je pense que celà dois augement lorsque l'ont dépasse une heure

-4ème et 5ème bloc: je ne m'en sert pas.

une trame type:

Code:

153014-02173847 403100100F10619181428 00'12" 3B0040101 00023084

A+
merci
tibo
20/02/2007, 22h59
thibautlelevier

on avance
j'ai continuer d'afficher les trames dans un Memo avec ce code:
Code:

1 2 3 4 5 6 void __fastcall TForm1::ComPort1RxChar(TObject *Sender, int Count) { AnsiString Str; ComPort1->ReadStr(Str, Count); Memo1->Text=Memo1->Text + Str; }
voyant que ça ne passé pas à la ligne j'ai transformer la dernière ligne en

Code:

Memo1->Text=Memo1->Text + Str + "\n";

grossière erreur me direz vous? pas forcement car je me suis apperçu que la trame est alors composée de 10 ligne de 9 caractères suivit d'une ligne de 5 caractères.

je me suis aussi appeçu qu'en fait, en conditions rééles, le PABX finisait sa trame par \n (car il passe à la ligne)

enfin bref est-ce que mes hypothéses son bonnes?
le système actuellement en place a encore planté aujourd'hui et j'ai vraiment besoin d'avancer

A+
tibo

strtok est ta délivrance

je te donne un exmple qui lit plusieurs lignes de données séparées par des ;
ds ton cas, le separateur peut etre un espace ou une sequence particuliere, tu peux les cumuler...
Donc lit tte ta ligne sur la RS232 puis strtok là..
Ciao

__________
1;Message pour la gloire;dummy comment
2;Message 2 pour la gloire;dummy comment2
__________

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
  ifstream ImageTxtFile( DlgSelYearCalendar->OpenDialogImages->FileName.c_str(), ios::in);
  if ( !ImageTxtFile) {
          AnsiString ss="File open error "+DlgSelYearCalendar->OpenDialogImages->FileName;
          Application->MessageBox( ss.c_str(),"Error", MB_OK+MB_ICONSTOP);
          return;
          }
  i=0;
  while ( !ImageTxtFile.eof())
   {
   if (::GetAsyncKeyState(VK_ESCAPE) & 0x8000 )  break;
            // ie sort de la boucle
   ImageTxtFile.getline( Comment, 200, '\n');
   p=strtok(Comment,";");
   ImgIndex[i]=StrToInt(p);
   p=strtok(NULL,";");
   ImageComments[i]=AnsiString(p);
   p=strtok(NULL,";");
   dummy=AnsiString(p);
   if (i++==12) break;
   }
  ImageTxtFile.close();

21/02/2007, 17h27
thibautlelevier

Salut

strtok est peut-être la solution mais je ne vois pas comment l'utiliser dans mon cas.
il n'y a pas vraiment de séparateur.

le problème n'es pas là non plus
il faudrai que mon programme reconnaisse les trames en fonction de certains paramètres autres que la taille

j'ai relancer une prise d'echantions pour voir ce que ça donne avec des communications de plus d'une heure
en attenandant, c'est dingue le nombre de personnes qui oublient de taper la fin de leur numéro :D
21/02/2007, 23h50
LotfiB

ceux qui ne tappent pas leur numeros en entier ne vont pas avoir d'appels aboutis !

tu as qd meme des "espaces" ou des sequences définies "F1..." ds ta séquences que la fonction peut repérer...

ciao
22/02/2007, 00h19
thibautlelevier

"aboutis" :D tu peut dire "abruti" :)
il s'agit d'un PABX dans une maison de retraite.
alors la mamie qui tape pas son numéro assé vite... je sais bien qu'elle ira pas loins :D

la séquence F1 dont tu parle ne se répette pas à chaque fois.

de meme pour les espaces, j'attend d'avoir plus d'échantillons pour en dire plus.

merci quand meme, cette commande va m'être tout de suite utile pour un autre programme :)

A+
tibo

Voir 40 message(s) de cette discussion en une page