Hi!

Delphi 2010, Win7.
Received packet on WireShark:
0000  51 1d 00 02 01 00 16 0f 01 31 05 1f 20 01 *80 *00
0010  4b 4d 00 e5 01 01 00 01 00 01 00 de 0a

This packet in: Str := Sock.RecvPacket(TimeOut);
51 1D 00 02 01 00 16 0F 01 31 05 1F 20 01 *3F *00 4B 4D 00 E5 01 01 00 01
00 01 00 DE 0A

Byte 15 is changed from $80 to $3F. Happens all the time with $80 data byte.

Str: AnsiString;
Casting:    Str := AnsiString(Sock.RecvPacket(TimeOut));
- do not help this time.

It helped with a longer packet from other device before in the same
application.
I am sure this happens because the string in Delphi 2010 is wide string, by
data is byte array.

How to solve this problem?

This bit is important, it shows RF power amplifier mode!

Best regards,
Dmitri

Attachment: TxCmd.pas
Description: Binary data

------------------------------------------------------------------------------
Slashdot TV.  Video for Nerds.  Stuff that Matters.
http://pubads.g.doubleclick.net/gampad/clk?id=160591471&iu=/4140/ostg.clktrk
_______________________________________________
synalist-public mailing list
synalist-public@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/synalist-public

Reply via email to