AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Exception während RS232 Datenempfang
Thema durchsuchen
Ansicht
Themen-Optionen

Exception während RS232 Datenempfang

Ein Thema von akuk · begonnen am 12. Mär 2020 · letzter Beitrag vom 26. Mär 2020
Antwort Antwort
akuk

Registriert seit: 8. Mär 2020
Ort: Wald, Zürich Oberland
51 Beiträge
 
Delphi 10.3 Rio
 
#1

AW: Exception während RS232 Datenempfang

  Alt 13. Mär 2020, 17:06
Hallo Himitsu
Ja das habe ich in der Zwischenzeit auch herausgefunden. Du hast absolut
richtig getippt.
Wenn die Procedur IstwertAnzeige aufgerufen wird während dem im Thread
eine neue IstwertMeldung empfangen wird, dann genau passiert es.

Wie macht man es am einfachsten ?
Nach jede empfangene Meldung eine Freigabe setzen, wenn eine neue Meldung kommt wieder rücksetzen. Oder soll ich zusätzlich noch ein Ack Signal seitens Hauptprogramm generieren ?
Oder gibt es eine bessere Methode ?
Anton Kurka
  Mit Zitat antworten Zitat
Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.782 Beiträge
 
Delphi 10.4 Sydney
 
#2

AW: Exception während RS232 Datenempfang

  Alt 13. Mär 2020, 20:02
.. vielleicht hilft es ein
TCriticalSection.Aquire beim Eintritt in die istWertAnzeige setzn
und vor dem Verlassen ein TCriticalSection.Release.

Grüße
Klaus
Klaus
  Mit Zitat antworten Zitat
Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.782 Beiträge
 
Delphi 10.4 Sydney
 
#3

AW: Exception während RS232 Datenempfang

  Alt 15. Mär 2020, 09:42
.. ist istWertAnzeige eine Routine Deines Threads oder der Hauptprogramms?

Das Image ist kein Bitmap oder?
Bitmaps sind nicht threadsafe.

Grüße
Klaus
Klaus
  Mit Zitat antworten Zitat
akuk

Registriert seit: 8. Mär 2020
Ort: Wald, Zürich Oberland
51 Beiträge
 
Delphi 10.3 Rio
 
#4

AW: Exception während RS232 Datenempfang

  Alt 16. Mär 2020, 16:24
Hallo
Nach dem ich mich durch div. Tutorials durchgekämpft habe versuchte ich
mein Problem mit der Exception zu lösen.
Nun tritt eine andere Exception. Was ich gemacht habe :

In der Unit für RS232 Empfang (OptiNumericCom.Pas) die im Thread läuft
habe ich CriticalSction definiert ab Empfang der Daten bis Empfang beendet

var
.
EmpfangCS : TRTLCriticalSection;
.
.
function TOptiNumericComm.receiveMessage : TMeldung;
.
.
.
EnterCriticalSection(EmpfangCS);
id := recByte; //Empfang von 1.Byte (Meldungstyp) ****** Hier Exception *****

case (id AND $0F)
$01:
// usw
else //Meldung-In (16 Byte) einlesen
begin
SetLength(Result, 17);
Result[0] := id;
for i:=1 to 16
do Result[i] := comport.GetByte;
end;
end; //ende Case
LeaveCriticalSection(EmpfangCS);
======================
Im Hauptprogramm ist keine CriticalSection definiert,is auch nicht nötig,
ich will nur erreichen, dass der Empfang im Thread ohne Unterbruch
durchläuft.

Die Exception tritt auf bereits beim Empfang von 1. Byte. (id := recByte
Recbyte befindet sich in eine andere Unit,ist natürlich mit uses deklariert.
Wo ist das Problem ?
Der Datenempfang hat vorher ohne CriticalSection für erste paar Meldungen funktioniert bis Exception auftratt wg. Synchronisation.
Anton Kurka
  Mit Zitat antworten Zitat
akuk

Registriert seit: 8. Mär 2020
Ort: Wald, Zürich Oberland
51 Beiträge
 
Delphi 10.3 Rio
 
#5

AW: Exception während RS232 Datenempfang

  Alt 16. Mär 2020, 19:05
Hallo
Ich habe vergessen die CS Initialisieren.
Jetzt läuft es durch,Meldungen werden Empfangen aber
der Empfang wird irgendwie gestört, es kommen wirre Werte über RS232.
Verlangsamt CS den Empfang ?
Und es kommt die alte Exception wieder, wie wenn das CS nicht wäre.
Ich muss es mit dem LA morgen genau anschauen was da passiert.
Anton Kurka
  Mit Zitat antworten Zitat
Rollo62

Registriert seit: 15. Mär 2007
4.176 Beiträge
 
Delphi 12 Athens
 
#6

AW: Exception während RS232 Datenempfang

  Alt 16. Mär 2020, 19:59
Versuch im Rs232 Empfang nur die Daten z.B. in einem Fifo od. Ringbuffer zu speichern, und dann schnell wieder raus.
Die Verarbeitung dann an einer separaten Stelle Durchführen.
  Mit Zitat antworten Zitat
Benutzerbild von Sinspin
Sinspin

Registriert seit: 15. Sep 2008
Ort: Dubai
723 Beiträge
 
Delphi 10.3 Rio
 
#7

AW: Exception während RS232 Datenempfang

  Alt 17. Mär 2020, 09:10
Hallo,

beim Empfang solltest Du kein CriticalSection verwenden, denn das kann das Annehmen von Daten blokieren.
Besser ist es wirklich einen ausreichend großen internen Puffer zu verwenden und einen anderen Thread die Verarbeitung machen zu lassen.
Für den Zugriff auf den Puffer musst Du dann sicherstellen das beim auslesen und reinschreiben andere Positionsmarken (Leseposition/Schreibposition) verwendet werden. Ansonsten ist wieder synchonisation nötig, was dann wieder Daten killen könnte.
Stefan
Nur die Besten sterben jung
A constant is a constant until it change.
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:05 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz