1个回答
推荐于2016-11-24
展开全部
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^)
变量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^)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询