UNIDBGRID 动态增加列后
Columns.Add;
Columns[28].Menu.MenuEnabled:=False;
Columns.Items[28].FieldName:='BUTTON';
Columns.Items[28].Title.Caption:='操作';
Columns.Items[28].Title.Alignment:=taCenter;
Columns.Items[28].Alignment:=taCenter;
Columns.Items[28].Width:=100;
再动态增加列按钮
Columns.Items[28].ActionColumn.Enabled:=True;
Columns.Items[28].ActionColumn.Buttons[0].ButtonId:=0;
Columns.Items[28].ActionColumn.Buttons[0].Hint:='编辑';
Columns.Items[28].ActionColumn.Buttons[0].ImageIndex:=1 ;
运行后,出现如下错误

请教该如何解决?