Работа с буфером ... КАК правильно?

Тема в разделе "Delphi - Система", создана пользователем Spoiler, 18 ноя 2005.

Статус темы:
Закрыта.
  1. Spoiler

    Spoiler Гость

    Всем привет.

    Записываю данные в буфер.
    Сам буфер описал как

    BUF_s,
    BUF_r : Array [ 0 .. 8191 ] of Longint;

    Длаю запись данных в буфер
    BUF_s[ 0 ] := $80;

    BUF_s[ 1 ] := $00; //length
    BUF_s[ 2 ] := $1A; //length

    BUF_s[ 3 ] := $10; //VERSION
    BUF_s[ 4 ] := $00; //FLAG
    BUF_s[ 5 ] := $20; //PACKSIZE
    BUF_s[ 6 ] := $00; //PACKSIZE
    BUF_s[ 7 ] := $46; //HI
    BUF_s[ 8 ] := $00; //DATA LENGTH
    BUF_s[ 9 ] := $13; //DATA LENGTH
    ................................

    View_BUF_SND.AppendBuffer( @BUF_S, 99 );

    здесь пытаюсь просмотреть содержание буфера но там почему следующее
    80 00 00 00 00 00 00 00 1A 00 00 00 10 00 00 00
    00 00 00 00 20 00 00 00 00 00

    View_BUF_SND.SelStart := 0;

    if send( Sock, BUF_S, 9 , 0 ) = SOCKET_ERROR then
    Debug_.Items.Add( 'filed ... !' )
    else
    Debug_.Items.Add( 'Data send ... OK ... !' );

    Соответственно когда посылаю данные, содержание буфера как я полагаю отличается от того, что я туда писал

    Народ, объясните как правильно производить запись в буфер, просматривать и отправлять
     
  2. zubr

    zubr Гость

    Проблема в том, что буфер у тебя объявлен как массив типа Longint, а загоняешь туда числа размером в байт, поэтому так и получается. Вместо BUF_r : Array [ 0 .. 8191 ] of Longint; сделай BUF_r : Array [ 0 .. 8191 ] of byte; и будет тебе счастье :(
     
Загрузка...
Похожие Темы - Работа буфером КАК
  1. hosm
    Ответов:
    0
    Просмотров:
    3.770
  2. Andrey Kha
    Ответов:
    0
    Просмотров:
    33
  3. Hoasker
    Ответов:
    0
    Просмотров:
    65
  4. garri671
    Ответов:
    0
    Просмотров:
    74
  5. lelik200969
    Ответов:
    0
    Просмотров:
    55
Статус темы:
Закрыта.

Поделиться этой страницей