求教指针转换

[asideu]

以下c++代码
char* s;
short* l;
l=(short *)*((unsigned long *)(s+0xa));

转换为delphi：
s:^char;
l:^short;
longp:^longint;
inc(s,10);
longp:=PLongInt(s);
l:=PShort(s^);//这句报错
dec(s,10);
有何不对的地方吗？



不知道咋修改 求教高人。

[sanguomi]

var
  S: PChar;
  l: PShortInt;
begin
  l := PShortInt(PCardinal(s + $a)^);
end;

[sanguomi]

PShort
DELPHI 里没这个类型吧,只有 PShortInt

[asideu]

s + $a 我编译的时候怎么提示不能这样操作呢？

指针不能直接加减吗？

[haitao]

inc(s,$a);

[starluck]

[Quote=引用 3 楼 asideu 的回复:]
s + $a 我编译的时候怎么提示不能这样操作呢？

指针不能直接加减吗？
[/Quote]

用INC