Probleme avec TcomportRésolu

Question

Bonjour,
J'ai un soucis d'utilisation du composant Tcomport (communication s&#233;rie). Je ne trouve pas comment faire. Je ne maitrise pas ce composant.
J'ai mis les composants ComComboBox pour chaque param&#232;tre (6 au totals). Lorsque je modifie une valeur dans ces comcombobox, la modification pour Tcomport est aussitot pris en compte. Je le vois avec la fonction comport1.ShowSetupDialog.
J'ai m&#233;moris&#233; ces parametres dans un fichier. Lorsque je lance ma fiche, les parametres sont lu et remis dans les comcombobox mais et c'est l&#224; mon probl&#233;me, je ne sais pas mettre &#224; jour le composant Tcomport. Il garde les valeurs d&#233;fini dans l'inspecteur d'object qui ne correspondent pas aux valeurs qu'il y a dans les comcombobox mais d&#232;s que je touche &#224; un comcombobox celui ci remet &#224; jour le parametre dans tcomport.
Ma question: Comment mettre &#224; jour les param&#232;tres vitesse baud, parite, nb bit, etc.. du composant Tcomport?
Y a t-il une fonction qui dit ComPort.mise_&#224;_jour_suivant_valeur_combobox ?

merci de vos r&#233;ponses

jlen100 · Accepted Answer

salut,

je ne l'ai jamais fait mais l'aide comport donne ceci pour l'enregistrement et le rechargement des proprietes



Example (Configuration file)



begin

  // store settings to configuration file sauvegarde

  ComPort1.StoreSettings(stIniFile, 'c:\ComPortTest.ini');

  // load settings rechargement

  ComPort1.LoadSettings(stIniFile, 'c:\ComPortTest.ini');

end;

si cela peut t &#234;tre utile

&#224;+jlen

jlen100 · Answer

j'ai test&#233; &#231;&#224; marche pour mettre &#224; jour le composant Tcomport mais il
faut quand m&#234;me mettre &#224; jour les comcombobox  ind&#233;pendament

@+

jlen

cs_philpas · Answer

merci de t'a r&#233;ponse. C'est une solution que je vais conserver. Mais entre temps, j'ai trouv&#233; une autre possibilit&#233; qui fait la m&#234;me chose mise &#224; jour de comport

ComPort1.Port:=ComComboBox1_Port.Text;
ComPort1.BaudRate:=StrToBaudRate(ComComboBox2_Vitesse.Text);
ComPort1.DataBits:=StrToDataBits(ComComboBox3_NbBit.Text);
ComPort1.StopBits:=StrToStopBits(ComComboBox4_BitStop.Text);
ComPort1.Parity.Bits:=StrToParity(ComComboBox5_Parite.Text);
ComPort1.FlowControl.FlowControl:=StrToFlowControl(ComComboBox6_Flux.Text);

Voil&#224;
 
A+

jlen100 · Answer

c'est une solution &#224; laquelle je n'avais pas pens&#233; ; j'aurais du
regarder dans l'aide &#224; autres fonctions / fonctions de convertion!!

@+

jlen

cs_philpas · Answer

Je vais encore utiliser ton savoir sur ce composant si tu le veux bien. Comment r&#233;cup&#232;re t-on l'information qui dit que le port est pr&#234;t &#224; recevoir des donn&#233;es et l'information qui dit que le port demande l'autorisation &#224; emettre et recevoir sans doute une r&#233;ponse Ok tu peux emettre. je ne trouve pas l'instruction


 if comport.pret_a_recevoir then .....


ou
if comport.reponse_&#224;_demande_autorisation_emettre then ...

Merci

jlen100 · Answer

si tu utilises controle de flux harware(RTS/CTS)  utilises les
event OnCTSChange et la fonction setRTS pour indiquer une demande
d'&#233;mission.

dans le cas d'un controle software les donn&#233;es sont bufferis&#233;es tu peux
connaitre l'&#233;tat d'avancement et appelant les fonctions inputcount et
outputcount



@+

jlen

cs_philpas · Answer

Oui mais ceci c'est si j'utilise le controle de flux. Si je ne l'utilise pas ce controle de flux, est ce que le signal DSR sur le port est suffisant pour savoir si je peux envoy&#233; mes caract&#232;res sur le port.
C'est &#224; dire : si j'ai DSR sur le port du PC A cela veux dire que le PC B est pret &#224; recevoir mes donn&#233;es? et l'inverse si je n'ai pas le signal DSR sur A c'est que le port B n'est pas ouvert.
Ce que je dis est vrai ou faux?

Merci

jlen100 · Answer

non pour faire communiquer 2 PC ce n'est pas suffisant il faut faire un
protocole de communication soit en cotrole Hardwre soit en software

en hardware tu envoie un RTS et tu attends un CTS 

en software il faut cr&#233;er un protocole qui ressemble &#224; &#231;&#224;:

 tu envoies une trame d'interrogation

et tu attends la r&#233;ponse (mieux vaut mettre un timeout si tu ne veux pas bloquer le PC et cas de non r&#233;ponse)

quand tu as re&#231;u la confirmation que le PC est pret tu lances la transmission.

mais quelque soit la m&#233;thode il faut toujours v&#233;rifier que la transmission est possible (PC branch&#233; et &#224; l'&#233;coute).

@+

jlen

jlen100 · Answer

precision en fait dans l'absolu on ne fait pas communiquer 2 PC entre
eux mais 2 applications situ&#233;es &#224; distance( dans 2 PC ou autres
automates....)

une fa&#231;on simple de d&#233;tecter si l'appli est &#224; l'&#233;coute par exemple:

Com1.Writestr('P');//on envoie 1 caractere qui doit &#234;tre reconnu par le recepteur;

timeout.enabled:= true // on met un timer regl&#233; ~1s et dans timeoutOntimer on timeout.enabled:=false; 

while (com1.inputcount =0) and (timeout.enabled) do //on attend que le recepteur est envoy&#233; un caractere ou que la fin du timeout

Application.ProcessMessage;//pour ne pas bloquer

il suffit que le r&#233;cepteur envoie 1 caractere pour savoir qu'il est &#224; l'&#233;coute et pret &#224; recevoir.

pour que ton programme soit toujours &#224; l'&#233;coute il suffit de laisser la com1 ouverte

ensuite soit tu testes l'imputcount p&#233;ridodiquement (dans un timer) soit tu utilises l'&#233;venement onrxchar).

@+

jlen

cs_philpas · Answer

C'est loin d'&#234;tre simple quand on ne maitrise pas un composant ou une fonction

jlen100 · Answer

c'est surtout le probl&#232;me des communications qui, en g&#233;n&#233;ra,l n'est pas simple.

Il y a une r&#232;gle que j'applique dans les communications entre applications:

1)s'assurer qu'elle est prete &#224; recevoir les donn&#233;es

2) s'assurer qu'elle &#224; bien re&#231;ue les donn&#233;es (attente d'au moins un caract&#232;re en retour)

 en effet la communication peut toujours &#234;tre interrompue ou perturb&#233;e



on peut y ajouter des sommes de controle et autres petits plaisirs!!

mais il faut savoir que la communication n'est jamais garantie &#224; 100%



si tu &#224; besoin d'aide &#224; ce sujet n'h&#233;site pas



@+

jlen

cs_philpas · Answer

je n'h&#233;siterais pas, je vais d&#233;j&#224; essayer d'assimiler tout &#231;a.

A+

Probleme avec Tcomport

12 réponses

Votre réponse

Discussions similaires