Forum: Object-Pascal / Delphi-Language
Delphi
by jbg,
2. Mär 2003
Ändert sich der Wert von ComPort1.InputCount? Wenn ja, was ich annehme, dann solltest du das ganze in eine while-Schleife umwandeln, da bei einer for-Schleife der Ziel-Wert nur einmal ausgewertet wird. Also bei einer Änderung von InputCount iteriert die for-Schleife immernoch bis zum alten Wert, der beim Eintritt in die Schleife von InputCount zurückgeliefert wurde.
Hast du auch das sCom...
Forum: Object-Pascal / Delphi-Language
Delphi
by jbg,
2. Mär 2003
Und das Ersetzen soll dabei helfen, den Fehler zu finden. Das das Programm dann nichts von der seriellen Schnittstelle liest ist mir klar. Aber zum eingrenzen des Fehlers dient es allemale.
In dem rufst du kein ComPort1.InputCount auf. Könnte der Fehler vielleicht dort liegen.
Forum: Object-Pascal / Delphi-Language
Delphi
by jbg,
2. Mär 2003
Ersetze mal ComPort1.InputCount und ComPort1.ReadStr() durch 1 bzw. sCom := #0#32.
Wird die Zeile dann ausgeführt? Wenn ja, dann einzeln die original-Funktionsaufrüfe ausprobieren.
Forum: Object-Pascal / Delphi-Language
Delphi
by jbg,
2. Mär 2003
Was hast du eigentlich mit sCom vor? Du liest doch nur 1 Zeichen ein, der muss man das ComPort1.ReadStr(sCom, 1); anders verstehen?
Forum: Object-Pascal / Delphi-Language
Delphi
by jbg,
2. Mär 2003
Kommt nachdem du dann gedrückt hast die MessageBox?