这样定义的Button创建

Question

一般我们可以通过
var
  btn:TButton;
然后
  btn:=TButton.Create(Self);
  btn.Parent:=Self;
动态创建Button
但是我先在想通过
type
  PButton = ^TButton;
var
  DynButton:  PButton;
 然后
  New(DynButton);
 DynButton^.Left := 24;
 DynButton^.Top := 24;
 DynButton^.Width := 24;
 DynButton^.Height := 24;
 DynButton^.Caption := 'CCC';
 DynButton^.Parent:=Self
这样可以吗，手上没有Delphi,哪位可以帮我
看看，如果不可以，请问如何才可以实现一个动态指针类型
type
  PButton = ^TButton;
var
  DynButton:  PButton;
这样定义的Button创建

Answer 1

这样不行
你的对象事例并没有创建
以下引用都会报地址错误的
 DynButton^.Left := 24;
 DynButton^.Top := 24;
 DynButton^.Width := 24;
 DynButton^.Height := 24;
 DynButton^.Caption := 'CCC';
 DynButton^.Parent:=Self
还是要加 DynButton^:= TButton.Create(Self);这句才行

Answer 2

回复人： hjf8086(hjf) ( ) 信誉：87

Answer 3

New(DynButton);只会New一个指针的地址给他，而具体的指向则是随机了。也就是，这里只分配了针地址。