Picklist的下拉选择后触发事件,类似ComBox的效果,使用Columns里的OnUpdateData事件即可解决:
procedure TForm1.DBGridEh1Columns6UpdateData(Sender: TObject;
var Text: string; var Value: Variant; var UseText, Handled: Boolean);
begin
showmessage(text);//这个text就是用户从Picklist下拉框中选择的内容
end;