Einzelnen Beitrag anzeigen

js747a

Registriert seit: 11. Aug 2008
Ort: Nord hessen
43 Beiträge
 
Delphi 7 Enterprise
 
#1

Cport und Delphi 10.3

  Alt 8. Jun 2020, 10:46
Hallo, ich programiere ein Programm zur Steuerung von Modelleisenbahnen.
Bisher habe ich seit jahren mit Delphi 7 programiert.

In meinem Programm Steuere ich eine Intellybox uber die COM Schnittstelle (Serial Port) mit CPort.

Bisher har alles funktioniert.
Jetzt programiere ich mit Delphi 10.3 und schon gibt es Fehler.
Am Anfang bekomme ich die Selben Antworten von der IntellyBox über die COM Schnittstelle. Aber schon nach einigen Sekunden sind die Daten anders als
in meinem Programm programiert mit Delphi 7

Senden mache ich mit : InterfacePort.WriteStr

InterfacePort.WriteStr('x' + Chr(202)); Wobei Chr(202) ein Befehl darstellt.

Die Antwort lese ist aus mit :InterfacePort.ReadStr

ProtokolIBForm.RxStr(Count: Integer);
var Str: String;
i : Integer;
begin
InterfacePort.ReadStr(Str, Count);
If Length(Str) > 0 then
begin
RxChars := Str;
RxCount := Count;
RxChar := pchar(RxChars);
End;


RxChars und RxChar sind

RxChars : String;
RxChar : pChar;

Ich habe schon mit
RxChars : AnsiString;
RxChar : pAnsiChar;

versucht aber das Ergebnis ist dasselbe
  Mit Zitat antworten Zitat