Unsigned char Buff[255];
int Length
unsigned char* p;
p=Buff;
p+=24;
Category=*p;
Length=(*p)*256+(*(++p));
int Length
unsigned char* p;
p=Buff;
p+=24;
Category=*p;
Length=(*p)*256+(*(++p));
解决方案 »
- delphi 2010 和 有道桌面词典有冲突吗?
- 一个关于ADOQUERY使用的问题!!
- 客户端程序用到服务器的Sql Server,请问客户端也需要安装Sql Server软件吗?
- 100分求idhttp怎样get网站的图片文件?
- 急救,如何把array[1..199] of byte转换成string啊
- 求助:用Delphi在指定图片上插入汉字,怎样实现??
- 关于数据集的问题
- 如何进行“阴历”和“阳历”之间的转换?
- ODBC设置的问题
- 有谁可以帮我把这段Delphi的程序改成C#的程序?
- 从TGraphicControl继承组件
- 有谁知道MSCOMM这个控件在哪里下啊?是不是delphi里面自带的啊?
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;
可改為
inc(integer(p), 24);//對應的 p+=24;
如:@p