关于自动创建DBGrid的问题 ( 积分: 100 )

我用 a:=TDBGrid.create(nil); 创建完DBGrid 后为什么看不见啊?? 是不是还需要些别的什么啊?? 还有就是 我想把 这段代码作为一个过程写在一个公共窗体里 这样我在别的窗体里调用的时候它是创建在公共窗体里还是正在使用的窗体??

procedure TForm1.Button1Click(Sender: TObject);
var
a: TDBGrid;
begin
a := TDBGrid.Create(nil);
a.Parent := Form1;
end;
需要指定DBGrid的Parent。

procedure TForm1.Button1Click(Sender: TObject);
var
DBGrid: TDBGrid;
begin
DBGrid:= TDBGrid.Create(nil);
DBGrid.Parent:=self;//这个就是要显示的窗体
DBGrid.Top:=10;
DBGrid.Left:=10;
DBGrid.Width:=self.Width-30;
DBGrid.Height:=self.Height-40;
DBGrid.Visible:=true;//不显示是少了这个
end;

谢谢二位了