Discussion :

[Vodkha]

Hello

Je dois envoyer des codes à une eprom et cette dernière me renvoie des valeurs correspondants aux codes demandés.

J'ai un prob avec le code suivant

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
procedure TForm1.BtnOpenCOMClick(Sender: TObject);
begin
  ComPort.Close;
  ComPort.Port:='com1';
  ComPort.Open;
end;
 
procedure TForm1.ComPortRxChar(Sender: TObject; Count: Integer);
var
  car_entree : String;
  nb_cara    : Integer;
begin
  Comport.ReadStr(car_entree,Count);
  ListBox1.Items.Add(car_entree);
end;
procedure TForm1.BtnSendParamClick(Sender: TObject);
var
    chaine : string;
begin
   chaine := debut+EdtParam.Text;   //debut est une cst
   comport.WriteStr(chaine);
   ComPort.SetRTS(True);     //Set Request To Send
    ComPort.SetDTR(True);     //Set Data Terminal Ready (PC pret à recevoir)
    ComPort.SetRTS(False);
end;

J'aimerais juste afficher les résultats dans une ListBox

Merci

[MD Software]

C'est quoi ton problème ?

[Vodkha]

Je ne reçois aucun caractère, l'évenement OnRxChar ne reçoir rien

Est-ce un problème de ligne ou autre ?

[MD Software]

Est-ce un problème de ligne ?

Il semblerait

[Sub0]

Il ya plusieurs méthodes pour communiquer avec une eprom, tout dépend de ton interface électronique et du type d'eprom utiliisé. Apparemment, tu n'utilises pas les trames rs232 pour effectuer la communication, c'est donc de l'accès direct... Est-ce que c'est toi qui a conçu le montage ?

Je pourrais te conseiller d'utiliser ZLPortIO plutôt que TComPort car selon moi, ZLPortIO est plus approprié pour de l'accès direct, tandis que TComport est plus approprié pour une communication RS232.

http://www.developpez.net/forums/viewtopic.php?t=133052

à+

[Vodkha]

Il faut que j'utilise le Port COM et pour ce qui est du montage oui c'est moi qui l'aie développé.

Mais quelle ligne dois-je utiliser ?

[Sub0]

Il faut que j'utilise le Port COM et pour ce qui est du montage oui c'est moi qui l'aie développé.

Mais quelle ligne dois-je utiliser ?

Toi seul peut le savoir ! Puisque c'est toi qui a mis au point le montage, toi seul connais sont principe de fonctionement. Tu es également le seul à connaître le type d'eprom utilisé et donc le protocol de communication... Sans le plan de l'interface électronique, ni la référence de l'eprom, nous ne pouvons rien faire à part de répondre au hasard. Bref, tu ne nous as pas donné les informations nécessaires pour pouvoir te répondre, comprend-tu ?

J'en profite pour te donner le code de ma démo (sanne du port COM1) :
http://sub0.developpez.com/delphi/scan_com.zip
(il faut extraire l'archive sur le disque pour que la démo fonctionne).

ps: Attention, le niveau logique des portes du port COM est inversé.
à+

[Vodkha]

Le protocôle je le connais je dois envoyer 20x 'e' puis 'Par' et l'E^2PROM(texas) me retourne des infos qui se trouve dans des registres.

Quand je mets l'oscillo sur tx ok bon data et sur rx aussi mais le soft ne fait rien alors je ne vois pas quoi faire ?

merci

[MD Software]

Tu as bien croisé les RX et TX de ta connexion ?

[Sub0]

Rien compris à ton explication, pourtant je suis plutôt calé en électronique...

Simplement, quelle est la référence de l'eprom et comment tu l'as branché au port ?

(ça m'a l'air d'être un sacré bricolage ton histoire... )

[Vodkha]

Tout ce qui touche à E^2prom est sous-traité par une autre personne, moi je dois envoyer des paramètres à l'eeprom pour la lire et écrire. Et cela par le Port COM tu comprends ? et moi quand j'envoie les paramètres ok mais est la réception je ne vois pas comment configuré le port voilà

[Sub0]

Nous voilà bien avancé !

C'est toi qui ai développé le circuit mais c'est une autre personne qui s'occupe de l'eprom, et c'est toi qui est chargé de développé le programme mais tu ne sais pas comment tout ça fonctionne à part qu'il faut envoyer 20x "e", ect... Et ben dis donc, je te souhaite bien du courage, à+

comport.ReadStr

[Vodkha]

Mais le eeprom ne joue aucun rôle je dois faire une communication bidirectionnelle avec le PORT SERIE

Quand j'envoie une commande par le port série je dois ensuite écouter celui-ci voilà mon prob que ce soir une eeprom motorola microchip texas on s'en f..

[Sub0]

As tu essayé avec comport.ReadStr pour écouter le port ?

[Vodkha]

Si tu avais regardé mon code tu n'aurais pas posé la question :-)

Oui je l'ai fait

[corwin_d_ambre]

Question con : Tu as teste ton cable ?

[edam]

une autre question con
tu as mis une point d'arret a l'evenement de comport?
quel est la langeur estimé des données renvoyer par l'eprom?
je vois que tuutlise les autre broche pour valisé votre envoit , eux aussi sont bien branché?
tu as vu le type de transmission (xoff, xon....)?????

[Vodkha]

oui le cable fonctionne bien : testé avec oscillo !

Mais tu parles de point d'arret tu peux m'en dire un peu plus ?

Et pour la quantité de données reçues elle varie mais le max 32K (taille EPROM)

Merci de ton aide

[jmdeffet]

Dans ton code:

Code :

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

1
2
3
4
 
   ComPort.SetRTS(True);     //Set Request To Send 
    ComPort.SetDTR(True);     //Set Data Terminal Ready (PC pret à recevoir) 
    ComPort.SetRTS(False);

Vu la vitesse du programme, ne coupes-tu pas ton request to send trop vite et par la même empêches-tu l'EEPROM d'envoyer ses données ou génères-tu une impulsion sur la broche RTS (est-elle de largeur suffisante?) pour commander l'envoi

[Vodkha]

non je n'ai pas généré d'impulsion sur RTS.

Dois-je le mettre à True et faire un sleep(10) ?