Inhaltsverzeichnis

CpComPort.SendByte()

Das CpComPort-Objekt ermöglicht es, direkt mit der seriellen Schnittstelle des Rechners zu kommunizieren. Daten können gesendet und gelesen werden. Das eröffnet z.B. die Möglichkeit, während eines Rennens Daten an einen Arduino zu senden und diesen entsprechende Aktionen ausführen zu lassen.

Das hier verwendete Beispiel findet sich bei allen Befehlen aus diesem Abschnitt, da sie nur gemeinsam wirklich Sinn machen und sich kaum einzeln herauslösen lassen.

Syntax

Befehl CpComPort.SendByte(ByteToSend)
Funktion Sendet ein Byte and die serielle Schnittstelle. Werte von 0 bis 255
Typ Byte
ab 3.3.1 build 480


Ein Byte besteht aus 8 Bits und kann maximal 256 Integer-Werte annehmen (0-255). Es ist nicht möglich, damit negative Werte abzubilden.


Codebeispiel


Veranschaulicht die Verwendung und Wirkung der neuen AddOn-Befehle zum Abfragen, Setzen und Löschen vergebener Zusatzpunkte im Serienrennen.

var
  sComPort: String;
  Baudrate: Integer;
  Parity  : Integer;
  StopBits: Integer; 
  ByteSize: Integer;
  
  Data         : String;
  BytesToRead  : Integer;
  BytesRead    : Integer;
  ByteToSend   : Integer;
  

  begin
  
    // Parameter der COM-Schnittstelle definieren
    sComPort := 'COM4';
    Baudrate := 19200;
    Parity   := 0;
    StopBits := 1;
    ByteSize := 8;
    
    // COM-Port öffnen. Wenn geöffnet (1), weitere Befehle ausführen
    if CpComPort.OpenCOM( sComPort, 
                          Baudrate, 
                          Parity, 
                          StopBits, 
                          ByteSize ) = 1 then
    begin
    
      // Sendet Daten an den COM-Port
      CpComPort.Timeouts (500);    // 500 mSek
      CpComPort.ClearBuffer;       // Lösche Empfangsbuffer
      CpComPort.BufferSize(100);   // Empfangsbuffer Größe
      CpComPort.SendString('"$');
      
      // Sendet ein Byte an den COM-Port
      ByteToSend := 128;
      cpComPort.SendByte(ByteToSend);
      cpShowMessage('Byte gesendet: ' + IntToStr(ByteToSend);
      
      // Liest Daten vom COM-Port
      BytesToRead := 1;
      CpComPort.ReadBytes( Data, BytesToRead, BytesRead );
      // "$ liefert # zurück
      cpShowMessage( 'BytesRead: ' + IntToStr(BytesRead) + Data );
      
     end
     else
       cpShowMessage( sComPort + ' konnte nicht geöffnet werden !' );
          
end.


Nach dem erfolgreichen Öffnen der Schnittstelle COM4 wird im ersten Schritt die Dauer festgelegt, die dieser Port auf Daten wartet.

Der nächste Befehl löscht den Datenspeicher und setzt anschließend die Größe auf 100 Bytes.

Abschließend wird die Zeichenfolge „$ an den COM-Port gesendet.

Im nächsten Befehlsblock wird die Richtung umgekehrt und Daten von der seriellen Schnittstelle gelesen. Es geht um 1 Byte. Die Variable Data enthält die Daten und BytesRead sollte enthalten, wie viele Bytes gelesen wurden.

Der Kommentar zeigt an, dass ggfs. andere Inhalte zurückkommen, als gesendet worden sind. Im Beispiel kommt ein # zurück, statt es zu erwartenden „$.

Sendet man z.B. eine 0 als Zeichenfolge über die serielle Schnittstelle, ist das Resultat beim Emfpänger eine 48.

Wie sich das Ergebnis aus dem Beispiel ergibt, kann ich nicht erklären. Bei 0 und 1 weiß ich es aus eigener Erfahrung. Hier wird kein Integerwert übertragen, sondern eine Zeichenfolge (Character). Als Basis dient der ASCII-Zeichensatz. Die 48 entspricht dem Zeichen 0, nicht der Zahl 0.

Soll z.B. ein Arduino ein Steuersignal bekommen und ihr sendet über Cockpit-XP eine 0 an die Schnittstelle, müsst ihr beim horchenden Arduino auf den Wert 48 reagieren.




Start - FAQ - Glossar - Sitemap - Impressum