Показать сообщение отдельно
Старый 06.10.2007, 14:33   #3
Новичок
 
Регистрация: 05.10.2007
Адрес: Украина
Сообщений: 19
Сказал Спасибо: 0
Имеет 23 спасибок в 13 сообщенях
DeVolf пока неопределено
По умолчанию

Код:
const
mp='8A 1B 15 01 10';
hp='8A 1A 15 01 10';
begin
if fromclient and (pck=#$38#$F5#$00#$EF#$00#$00#$00#$03#$00#$00#$00) then
begin
buf:=hstr(hp);
SendToServer;
end;
if fromclient and (pck=#$38#$F5#$00#$EF#$00#$40#$00#$03#$00#$00#$00) then
begin
buf:=hstr(mp);
SendToServer;
end;
end.
вот теперь правельно)
а как мне сделать чтоб пакет не дошол до сервера (pck=#$38#$F5#$00#$EF#$00#$40#$00#$03#$00#$00#$00) ?
DeVolf вне форума   Ответить с цитированием
За это сообщение DeVolf нажился 3 спасибками от: