指针加100,如何实现? vc就可以,delphi不会写.

Question

不明白你想干什么，不过可以这样
  str:='liuyang';
  p:=@str;  //比如是$12F548
  Inc(p,100);

Answer 1

var
  str: string;
  p: PString;
begin
  Str := 'liuyang';
  p := @str;  //比如是$12F548
  Inc(P, 100); //出错了不要找我
end;

Answer 2

var
  str: string;
  p: PString;
begin
  Str := 'liuyang';
  p := @str;  //比如是$12F548
  Inc(P, 100); //出错了不要找我
end;//or  Integer(P) := Integer(P) + 100;

Answer 3

var
 p : PChr;
begin
//....  
  p := PChar(Integer(p)+100);string的指针位移是没有意义的，要用PChar，也就是C中的char *
string是Delphi自己维护的字符串，第一（str[0])个字节是字符串的长度

Answer 4

p:=p+$100;不对
 Inc(p,100);才行,
谢谢各位