为什么DELPHI里的指针不能象C++那样使用解决办法

为什么DELPHI里的指针不能象C++那样使用
var
  s:array[0..30] of char;
  p:^char;
  i:integer;
begin
  s:='ddssds';
  ShowMessage(s);
  p:=@s;
  for i:= 0 to strlen(s) do
  begin
  ShowMessage(p[i]);
  inc(p);
  end;
end;
为什么这样不能运行，好奇怪，

[解决办法]

Delphi(Pascal) code

var   s:array[0..30] of char;   p:^char;   i:integer;begin   s:= 'ddssds ';   p:=@s;   for i:= 0 to strlen(s) do   begin     showmessage(string(p^));     inc(p);   end;end;