CxGrid列加入ComboBox方法

wnjnfn

于 2021-01-28 15:47:02 发布

阅读量744

点赞数 1

分类专栏： Delphi 文章标签： delphi

本文链接：https://blog.youkuaiyun.com/wnjnfn/article/details/113343563

版权

Delphi 专栏收录该内容

9 篇文章

订阅专栏

Cxgrid的列属性Properties为comboBox,实现动态添加item方法：

(cxGrid1DBTableView1Column1.Properties as TcxComboBoxProperties).items.add("itemName");

或者

TcxComboboxProperties(cxGrid1DBTableView1Column1.Properties).Items.Add('aa');
TcxComboboxProperties(cxGrid1DBTableView1Column1.Properties).Items.Add('bb');

举例:

procedure TForm1.FormCreate(Sender: TObject);
begin 
  (cxGrid1DBTableView1Column1.Properties as TcxComboBoxProperties).Items.Clear;
  qry_type.Close;
  qry_type.SQL.Text:='select distinct itemname from item_table';
  qry_type.Open;
  while not qry_type.Eof do
  begin
    if length(trim(qry_type.fieldbyname('itemname').AsString))<>0 then
      (cxGrid1DBTableViewtype.Properties as TcxComboBoxProperties).Items.Add(qry_type.fieldbyname('itemname').AsString);
    qry_type.Next;
  end;
end;