Создание cxGrid от DevExpress

Помогите решить тривиальную задачку. Нужно динамически создать cxGrid.
Пример кода:
...
grRef:=TcxGrid.Create(vPanelCl);
grRef.Parent := vPanelCl as TWinControl ;
grRefLevel:=TcxGridLevel.Create(grRef);
grRefDBTableView:= TcxGridDBTableView.Create(grRef);
grRefDBTableView.DataController.DataSource:=DSource;
DSource.DataSet:=TBLRef.getDataSet;
for i:=0 to TBLRef.getDataSet.FieldCount-1 do begin
col:=grRefDBTableView.CreateColumn;
col.DataBinding.FieldName:=TBLRef.CurrentItem.AttrInfoByIndex.Field;
end;
...