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

delphi^@符号

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

转载▼

标签： 表示 delphi 杂谈

分类： Delphi

概述：

<wbr><wbr></wbr> ^: 指针</wbr>

<wbr><wbr></wbr> @: 取址</wbr>

<wbr><wbr></wbr> #: 十进制符</wbr>

<wbr><wbr></wbr> $: 十六进制符</wbr>

@:取址运算符;

var

<wbr><wbr></wbr> int:integer;</wbr>

<wbr><wbr></wbr> p:^integer;</wbr>

begin

<wbr><wbr></wbr> new(P);</wbr>

<wbr><wbr></wbr> int:=24;</wbr>

<wbr><wbr></wbr> p:=@int;</wbr>

<wbr><wbr></wbr> dispose(P);</wbr>

end;

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

var

<wbr><wbr></wbr> pint:^integer;</wbr>

begin

<wbr><wbr></wbr> new(pint);</wbr>

<wbr><wbr></wbr> showmessage(inttohex(integer(@pint),8));</wbr>

<wbr><wbr></wbr> pint^:=$ff;</wbr>

<wbr><wbr></wbr> showmessage(inttohex(pint^,4));</wbr>

end;

#:ASCII码值表示符;

const

<wbr><wbr></wbr> tab_key=#9;//TAB键的ASCII值</wbr>

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

var

<wbr><wbr></wbr> I: Integer;</wbr>

<wbr><wbr></wbr> PI: ^Integer;<wbr><wbr></wbr></wbr></wbr>

begin

<wbr><wbr></wbr> I := 10</wbr>

<wbr><wbr></wbr> PI := @I;;</wbr>

<wbr><wbr></wbr> PI^ := 20;</wbr>

<wbr><wbr></wbr> I := PI^;</wbr>

end;

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

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

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

end;