Danke für deinen schnelle Antwort.

Es hat wirklich daran gelegen, dass das erste Zeichen verschluckt wurde und das Delphi Programm dann die Bedingungen der if Schleife nicht mehr verstanden hat.

Die Baud Rate ist bei beiden auf 9600 eingestellt.