Цитата:
Сообщение от DjSeNseI
|
Смотри внимательно, я давал пример
delphi Код:
procedure build_RequestAuthLogin();
begin
InitPkt;
WriteW($32);
WriteID($00);
WriteS(DefaultAccount);
pos:=$11; WriteS(DefaultPassword);
pos:=33; WriteB($08);
pos:=$2a; WriteD(pkt_ckecksum(2,40)); // <----- чексумма
WriteD($0);
end;