delphi^@@,^,#,$符号

delphi^@符号

Delphi中@,^,#,$特殊符号意义(2012-04-05 08:35:51)

转载▼

标签： 表示 delphi 杂谈

分类： Delphi

概述：

  ^: 指针

  @: 取址

  #: 十进制符

  $: 十六进制符

@:取址运算符;

var

  int:integer;

  p:^integer;

begin

  new(P);

  int:=24;

  p:=@int;

  dispose(P);

end;

^:指针的引用解析操作符;

var

  pint:^integer;

begin

  new(pint);

  showmessage(inttohex(integer(@pint),8));

  pint^:=$ff;

  showmessage(inttohex(pint^,4));

end;

#:ASCII码值表示符;

const

  tab_key=#9;//TAB键的ASCII值

符号 ^ 有两种用途，当它出现在类型标识符之前，如^typeName，表示一个类型，该类型表示指向typeName类型变量的指针；当它出现在指针变量之后，如pointer^，该符号对指针解除参照，也就是说，返回存储在内存地址（该地址保存在指针中）的值指针,指向的数据.

var

  I: Integer;

  PI: ^Integer; 

begin

  I := 10

  PI := @I;;

  PI^ := 20;

  I := PI^;

end;

取指针的方法，比如y:=p^； 就是指为Y赋值指针P

================================================

procedure TForm1.Button1Click(Sender: TObject);
var
  PPA:array[0..4] of Integer;       //定义了一个数组
I,c:Integer;
  P:^Integer;       //定义的一个整式指针P
  str:string;
begin
  PPA[0]:=1;
  PPA[1]:=2;
  PPA[2]:=3;
  PPA[3]:=4;
  PPA[4]:=5;
  for i:=0 to Length(PPA)-1 do
  begin
    p:=@ppa[i];                        //把数组的地址给指针P
tr:=str+ ' '+ IntToStr(p^);         //P^是取出指针所指的数据
d;
  ShowMessage('数组中的值为：'+str);           //显示数据用

end;