Discussion :

[freespiritbcd]

bonjour je doit communiquer avec une carte,
le probleme est que je doit lui envoyé un "w" et cette derniere me repond une trame sous la forme XXXXXXXXXX,XXXXXXXXXX

voila j' arrive a emettre mais pas a recevoir, ou puis-je trouver une classe port serie qui peut emettre et recevoir de suite.

merci

[kurul1]

Tu utilises quoi pour communiquer par le port Com ?

Le composant TComPort devrait résoudre tes problèmes, Va voir ici

[Marie56556]

voila j' ai essayé avec Tcomport

j' arrive a envoyer:

Code :

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

1
2
3
4
5
6
7
 void __fastcall TForm1::Button1Click(TObject *Sender)
{
        ComPort1->Connected=true;
        AnsiString Phrase;
        Phrase = Edit1->Text;
        ComPort1->WriteStr(Phrase);
}

lorsque l'on clique sur le bouton il envoi le contenu de l' Edit1.

Code :

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

1
2
3
4
5
6
 void __fastcall TForm1::ComPort1RxChar(TObject *Sender, int Count)
{
        AnsiString Str;
        ComPort1->ReadStr(Str, Count);
        Edit2->Text=Edit2->Text + Str;        
}

mais la rien ne se passe, faut il activer la methode?

[freespiritbcd]

desolé je n' ai pas repondu avec mon pseudo car je suis chez une amies

je tien a preciser que evRxChar est bien a true

[freespiritbcd]

probleme resolu, c' était du au flow de control.

Maintenant est-il possible de creer le composant sans creer de fiche?

car je doit avoir une classe port serie, une mt2s, une telescope et une raquette.

[bandit boy]

Salut,
Il est possible de créer n'importe quel composant sans créer de fiche, tu as un exemple de création dynamique avec actions dans la rubrique Trucs et astuces.

Sinon j'ai développé une class pour le PortCom disponible en partie sur ce post.

[freespiritbcd]

le code que tu a fait creer un comport ou utilise celui de builder?

[bandit boy]

Ni l'un ni l'autre
En fait il utilise les API Windows comme le Comport. Cela reviens quasiment au même que si j'avais créé un ComPort.

Si tu veux en créer un, il te faut le Faire dynamiquement, comme l'exemple du bouton dans les trucs et astuces. Quelque chose comme:
dans le .h

Code :

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

1
2
 
TComPort *COM;

et dans le cpp:

Code :

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

1
2
3
 
COM = new TComPort(this);
...

Je n'ai pas le composant d'installé donc il se peut que la synthaxe ne soit pas correct.

[freespiritbcd]

le composant est ajouté,
je voudrai avoir une classe Portcom.cpp
et une classe mt2s.cpp qui derive de la classe Portcom.cpp

j'ai mi dans le Portcom.h en public

TComPort *COM;


et dans le Portcom.cpp:

COM = new TComPort(this);

mais j' ai des erreurs, me suis-je trompé quelque part?

[pottiez]

Peut tu nous dire quel sont les messages d'erreur, ca nous aiderais

[clecle]

Bonjour, je retrouve la même erreur au moment de la création de mon composant ComTerminal:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "CPort"
#pragma link "CPortCtl"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
TComPort *ComPort1;
ComPort1 = new TComPort(this);
 
TComTerminal *ComTerminal1 = new TComTerminal(this);
ComTerminal1->Parent = Form1;
ComTerminal1->Connected=false;
ComTerminal1->ComPort=ComPort1;
ComTerminal1->Name="Comterminal";
 
}
//---------------------------------------------------------------------------

Et voici le message d'erreur

Project Project1.exe raised exception class EAccessViolation with message 'Access violation at adress 40003005 in module 'VCL50.BPL'. Read of address 0000003C, Process stopped

j'utilise la lib cport2.64 et elle fonctionne parfaitement a la conception de fiche.

Quelqu'un a une idée?

[bandit boy]

Est ce que tu as ce message d'erreur quand tu passes directement par l'exe, et non par Builder?

Si c'est le cas, le problème vient du fait que tu n'as pas compilé avec les librairies intégrées.

[clecle]

Effectivement j'ai aussi ce message d'erreur pour exe, j'ai ressayé en décochant les cases "Use dynamic RTL" et "Build with runtime Packages".

Je retrouve a nouveau une erreur de Violation Acces mais a une adresse différente.

[Galkir]

as tu bien configurer ton numéro de port avant d'ouvrir la connexion?

[clecle]

Je n'ouvre pas encore de communication, j'initialise le connected à false. Il Fait la fautes à création du composant.