delphi的指针问题

来源:百度知道 编辑:UC知道 时间:2024/05/02 22:23:58
比如说
a,b:Pointer
现在a指向的地址中已经有值了如何能让b指向的地址中的内容也等于a的
能直接b:= a 吗?
我的意思是,想通过b把a里的数据取出来

delphi的指针定义形式为:
变量1,变量2,... :^具体类型

这个具体类型可以是系统的预定义的一些变量,也可以是一些自己事先声明的类型。
请参照下例子:

procedure TForm1.Button1Click(Sender: TObject);
var
a,b: ^integer;
c :integer;
begin
c :=100;
a := @c;
b := @c;
{目前 a 和 b 的指针均指向c变量的地址}
label1.Caption := 'a= '+inttostr(a^);
label2.Caption := 'b= '+inttostr(b^);

end;
对补充的回答:
【想通过b把a里的数据取出来】
如果a,b都是指针
b := a;//可以直接复制指针,但a的值用 b^表示
label1.caption := 'a='+inttostr(b^)