CoderX :: Forums - Показать сообщение отдельно - Кружок нубов(Вопрос-Ответ)

Breadfan · 25.01.2010, 01:10

to SeregaZ

тебе надо счтывать примерно так:

delphi Код:

If pck[1]:=#$4A then 
    Begin
     j:=2;                 // j - стартовая позиция указателя
     CharOID:=ReadD(j);   // -- OID перса
     TextType:=ReadD(j); //-- индекс чата в котором пишется текст
     nick:=ReadS(j);    //-- считывается ник, и, одновременно, указатель байта сдвигается на его длинну, т.е после выполнения команды будет j:=j+(длинна_блока_оканчивающегося "00 00")
     text:=ReadS(j);   //-- считывается текст
    end;

Когда пакет с текстовыми данными - номера байт явно не указывай
ReadH\D\S\Q(j) - не только считывает содержимое j-того байта, но и соответствуще меняет значение j
Вообще же, текст в пакете оканчивается "00 00" - можно так выискивать конец блока...

25.01.2010, 01:10	#7
Breadfan Местный Регистрация: 29.04.2008 Сообщений: 830 Сказал Спасибо: 80 Имеет 230 спасибок в 169 сообщенях	*to SeregaZ* тебе надо счтывать примерно так: delphi Код: If pck[1]:=#$4A then Begin j:=2; // j - стартовая позиция указателя CharOID:=ReadD(j); // -- OID перса TextType:=ReadD(j); //-- индекс чата в котором пишется текст nick:=ReadS(j); //-- считывается ник, и, одновременно, указатель байта сдвигается на его длинну, т.е после выполнения команды будет j:=j+(длинна_блока_оканчивающегося "00 00") text:=ReadS(j); //-- считывается текст end; Когда пакет с текстовыми данными - номера байт явно не указывай ReadH\D\S\Q(j) - не только считывает содержимое j-того байта, но и соответствуще меняет значение j Вообще же, текст в пакете оканчивается "00 00" - можно так выискивать конец блока... __________________ На фразы в аську типа "слух карочь 1)как точить 2)как раскачаться за 5 мин" - игнор. ИМХО идиотизм Дай голодному рыбу - он будет один день сыт. Покажи ему, как удить рыбу - он пошлёт тебя и скажет, что у него есть более интересные занятия, чем забрасывать снасти в воду David Kastrup @ de.comp.text.tex. "Приобретенные навыки общения с маленькими детьми - сильно упрощают взаимопонимание на форумах..." А вы знаете, что для качественной сварки - место шва нужно протереть спиртом? Последний раз редактировалось Breadfan, 25.01.2010 в 02:43.