Einzelnen Beitrag anzeigen

Quake

Registriert seit: 25. Aug 2003
222 Beiträge
 
Delphi 7 Enterprise
 
#15

Re: Auslesen der Schnittstelle mit SerialNG

  Alt 3. Sep 2007, 13:21
Warum verwendest du "ReadNextClusterAsString" wenn du Binärdaten lesen möchtest. Schau dir mal "ReadNextCluster" und "ReadNextClusterAsPChar" an.

Hier ein kleiner Auszug meines Programms, in dem ich SerialNG verwende. Dies ist keines Falls ein Code, den du 1:1 kopieren kannst.

Delphi-Quellcode:
procedure TMyForm.COMPortRxClusterEvent(Sender: TObject);
var
  CharRxBuffer: array[0..2047] of char;
  pRxBuffer: PChar;

begin
  pRxBuffer := COMPort.ReadNextClusterAsPChar(@CharRxBuffer);
  case pRxBuffer^ of
    'E':
      begin
      end;
    'I':
      begin
      end;
  end;

  inc(pRxBuffer);

end;
  Mit Zitat antworten Zitat