Discussion :

[Anthony17]

Bonjour à tous,

Je commence juste la programmation sur Delphi et je souhaite faire une petite application qui communique avec un périphérique.

A ce que j'ai compris, la procedure OnRxChar se déclanche lorsque des caractères sont recus sur le port série.

Voici mon code:

procedure TForm1.Button1Click(Sender: TObject);
begin
Comport1.Connected := Not Comport1.Connected;
end;

procedure TForm1.ComPort1RxChar(Sender: TObject; Count: Integer);

Var
Chaine:String;

begin
Comport1.ReadStr(Chaine,Count);
Memo1.Lines.Text :=Memo1.Lines.Text+Chaine;

end;

end.



Avec ce code je croi avoir fait: Si un caractères est recu sur le port série alors je lis les caractères et je les affiches dans un mémo.

Pourtant ca ne marche pas! j'ai du oublier quelque chose mais je ne sais pas quoi!

Merci de votre aide


PS: comment fait-on pour mettre le code dans un cadre ? ca doit etre [code][/ quelquechose]....???

[edam]

si simplement tu as bien lu l'example donnée "compexample.dpr" tu as du comprendre ton erreur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
procedure TForm1.ComPort1RxChar(Sender: TObject; Count: Integer);

Var
Chaine:String;

begin
setlength(chaine,count);
Comport1.ReadStr(Chaine,Count);
Memo1.Lines.Text :=Memo1.Lines.Text+Chaine;

end;

end.

[Anthony17]

j'ai bien ajouté cette ligne mais toujours rien ne s'affiche dans le mémo.

Qu'est ce que j'aurais pu oublié?
EventChar j'ai mis le caractère $ car toutes les trames que je recois commence par ce symbole.
Quel sont les autres paramètres importants?

Pour ce qui est de l'exemple j'ai pas pu le voir, il me dit que le fichier ressource n'a pas étai trouvé.

[edam]

1-pouqoi pas utilisé l'example comme il est et aprés crée votre prog?
2-ajoute le meme code dans ComPort1RxFlag
3-onrxchar ce déclanche a la réception du evenchar laisse le a #0 et regarde ce qui ce passe
3-comme fait tu le test sur le meme post en reliant ces deux port série ou...?

[Anthony17]

en fait je branche un GPS à mon PC. Ce GPS envoi en continu 8 trames.
J'ai fait un programme avec un Terminal, je vois bien les données défiler. Mais je cherche à traiter ces données. Terminal permet juste de les regarder?

Que fait RxFlag?

Si j'ai oublier un truc je le sais pas. J'envoi mon projet surement qu'il y a quelque chose d'évident que je ne vois pas !

[LadyWasky]

Tu es sous Windows XP ?
Es-tu sur que TComport fonctionne avec XP ?