delphi dbgridth combobox字段 picklist列表无法显示
这样的代码应该没错吧。

with DataModule2.SaleItemQuery do

begin

Open;

while not Eof do

begin

DBGridEh1.Columns[0].ButtonStyle:=cbsDropDown;

DBGridEh1.Columns[0].PickList.Add(FieldByName('名称').AsString);

Next;

end;

ShowMessage(DBGridEh1.Columns[0].PickList.Text);



可是combobox下拉框显示为空值。。。showmessage()可以把picklist的值全打印出来。


用了dbgrid也是同样的效果。求解答~~



[解决办法]
那看看你第0列和FieldByName('名称').AsString的值类型是否一致，还有，要不就重新生成一下列看看。