问题出在

could not convert variant of type(NULL) into type(OleStr)_解决方法

 如果 筛选出Column.Field.Value为 空值，不能转为 OleStr类型，要用VarToStrDef进行转换。

另外一种解决方法

if not  varisnull(Column.Field.Value) then
  ComboBoxEx1.ItemIndex := ComboBoxEx1.Items.IndexOf(Column.Field.Value);
//  ComboBoxEx1.ItemIndex := ComboBoxEx1.Items.IndexOf(VarToStrDef(Column.Field.Value, ''));