Unsigned char Buff[255];
int Length
unsigned char* p;
   p=Buff;
   p+=24;
   Category=*p;
   Length=(*p)*256+(*(++p));

解决方案 »

  1.   

    如有錯的地方, 歡迎指正!!
    var Buff: array[0..255] of char;
        Length: integer;
        p, p1: pointer;
    begin
     strcopy(buff, Pchar('1234567890abcd'));
     showmessage(strpas(buff));
     p := @Buff[0];
     showmessage(strpas(P));
     inc(integer(p), 3);
     showmessage(char(p^));
     Category := p^;
     p1 := p;
     inc(integer(p1));
     Length :=(integer(p^))*256 + Integer(p1^);
    end;
      

  2.   

    inc(integer(p), 3);
    可改為
    inc(integer(p), 24);//對應的 p+=24;
      

  3.   

    取什么地址?Delphi中取地址用@
    如:@p