Hallöchen,
komm gerade nicht mit dem Bit-Shiften weiter.
Delphi-Quellcode:
var
sCom: String;
begin
repeat
STC(#113#0);
STC(#106);
ComPort1.ReadStr(sCom, 2);
Application.ProcessMessages;
until
((sCom[1] = #106) and (sCom[2] >= Char(32))); ***
begin
BitBtnLesen.Enabled := True;
BitBtnSchreiben.Enabled := True;
end;
end;
Es geht um die zeile mit dem ***.
Und zwar hab ich mir folgendes vorgestellt:
((sCom[1] = #106) and (sCom[2] shr 32));
So klappt es nicht.
"[Fehler] Unit1.pas(248): Operator ist auf diesen Operandentyp nicht anwendbar"
Grüsse, Daniel
