我动态创建了一个cxgrid，但不能用，老大们帮忙看看

[telstar]

代码如下：
var
aView:TcxGridDBTableView;
begin

FCxGrid := tCxGrid.create(self);
FCxGrid.Parent := self;
FCxGrid.Visible := true;
FCxGrid.left := 100;
FCxGrid.Top := 100;
FCxGrid.Width := 200;
FCxGrid.height := 200;

aView := TcxGridDBTableView(FCxGrid.CreateView(TcxGridDBTableView));
// aview.

with aView do
begin
with createcolumn do
caption := 'abc';

showmessage(Columns[0].Caption);

DataController.DataSource := ds1;
(DataController as IcxCustomGridDataController).DeleteAllItems;
(DataController as IcxCustomGridDataController).CreateAllItems;
showmessage(Columns[0].Caption);

end;

可以用showmessage看到列名
但view没有显示出来，整个GRID都是灰的
项目中急需，在线等......老大们帮忙啊

[skypeople]

ＶＩＥＷ的某个属性没有设正确，可能是ＰＡＲＥＮＴ，ＶＩＳＩＢＬＥ之类的东东，试试吧！！

[SeekMyself]

tCxGrid.View := aView

[slzzg]

少了一个TcxGridLevel;

public
{ Public declarations }
tvTemp: TcxGridDBTableView;
lTemp: TcxGridLevel;
gdTemp: TcxGrid;
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
gdTemp := TcxGrid.Create(self);

lTemp := gdTemp.Levels.Add;
tvTemp := TcxGridDBTableView(gdTemp.CreateView(TcxGridDBTableView));


lTemp.Control := gdTemp;
lTemp.GridView := tvTemp;

gdTemp.ParentWindow := self.Handle;
gdTemp.Top := 0;
gdTemp.Height := 200;
gdTemp.Width := 400;

tvTemp.Preview.Visible := true;
tvTemp.DataController.DataSource := OraDataSource1;
tvTemp.DataController.CreateAllItems;
ShowMessage(tvTemp.Columns[0].Caption);
end;

[9807146wang]

有哪位大哥知道怎么用代码指定它的列cxGrid1DBTableView1Column1的Properties为ExtLookupComboBox;(动态指定的那种);多谢了。