Binäres Senden und Empfangen über die serielle Schnittstelle

[Schmandi]

Hey Dani,

vielen Dank für die schnelle Antwort.

Ich habe erstmal folgendes probiert und s geht super:

Delphi-Quellcode:

//Button Daten lesen und im Editfeld ausgeben
procedure TForm1.Button3Click(Sender: TObject);
var 
I: integer;
x: char;
y: string;

begin
x := ApdComPort1.GetChar; //Empfangen von einem Byte (zum Test fest auf 43 gesetzt)
Edit1.Text := x; //Hier wird das ASCII Zeichen '+' ausgegeben
I := Ord(x);
Edit2.Text := IntToStr(I);//Hier wird die Zahl 43 ausgegeben.
end;

@Tobi: Danke für diesen weitern Tip, werde ich auch noch ausprobieren.

Grüsse,
Johannes