RS485 / Serport im Process nutzen

1
2
Page 2 of 2

Administrator

Gender:
Location: Germany
Age: 24
Homepage: e-lab.de
Posts: 5558
Registered: 03 / 2002

Subject:

Re: RS485 / Serport im Process nutzen

· Posted: 29.03.2018 - 20:03 · #9

Hallo Thorsten,

bei mir tuts:

Code

{ functions }
process ReadZKS(128, 128 : iData, 4);
var
  Temp : byte;
  rxCnt : byte;
  xi : integer;
  strOutDiag : string[30];
begin
  rxCnt:= 0;
  Waitpipe(RxBufferC0);              // Warte auf Daten im Puffer
  rxCnt:= PipeStat(RxBufferC0);

  Read(SerInpC0, Temp);            // Puffer lesen
// ?????  FlushBuffer(RxBufferC0);   // löschen des Buffers
end ReadZKS;

rolf

pvs-deck

PowerUser

Gender:
Age: 53
Homepage: pvs-deck.de
Posts: 1341
Registered: 02 / 2009

Subject:

Re: RS485 / Serport im Process nutzen

· Posted: 29.03.2018 - 21:43 · #10

Quote by rh

Hallo Thorsten,

bei mir tuts:
rolf

Hallo rolf,

irgendwie habe ich im Moment lauter solche "komischen" Dinge, umso größer der Code wird

Ich versuche morgen mal ein kleines DEMO-Programm mit dem Problem zu erstellen.

Im Moment habe ich den Code zum testen einfach hinter dem DisplayProcess gehängt.

Thorsten

pvs-deck

PowerUser

Gender:
Age: 53
Homepage: pvs-deck.de
Posts: 1341
Registered: 02 / 2009

Subject:

Re: RS485 / Serport im Process nutzen

· Posted: 03.04.2018 - 17:29 · #11

Hallo rolf,

so das Problem ist erstmal erledigt. Ich habe im Process timing Probleme mit dem Protokoll gehabt.
Ich muss auf einige Telegramme innerhalb von 20ms antworten. Das funktioniert im Process nur mit einen "lock()".

Also habe ich das Ganze in einen zusätzlichen Task gebracht, da läuft es sofort und ohne Probleme.

Deswegen gehe ich da auch nicht mehr weiter in die Fehlersuche rein, trotzdem erstmal Danke.

Thorsten

1
2
Page 2 of 2

RS485 / Serport im Process nutzen

Registered users in this topic