Hallöchen,
ich erhalte zwar die richtigen Bytes, aber ins else if komme ich trotzdem nicht rein! Warum?
Delphi-Quellcode:
ShowMessage(IntToStr(Byte(sCom[1])) + IntToStr(Byte(sCom[2])));
if ((sCom[1] = #106) and ((Byte(sCom[2]) and 0) = 0)) then
begin
ShowMessage('Falsches Byte');
end
else if ((sCom[1] = #106) and ((Byte(sCom[2]) and 32) = 32)) then
begin
ShowMessage('Richtiges Byte');
end; //if
Ich erhalte auch die Bytes #106#32, aber in den else Teil komme ich einfach nicht rein, sondern in den if Teil mit der Message, Falsches Byte.
Es macht auch keinen Unterschied ob ich es mit
((Byte(sCom[2]) and 32) = 32))
oder
((Byte(sCom[2]) and 32) <> 0))
mache!
Was ist nur Falsch?
Vielen Dank.
Grüsse, Daniel