Question

delphi ADVStringGrid 怎么显示下拉列表

Answer 1

让 ADVStringGrid 组件显示下拉列表，其步骤如下：

1、设置 DefaultEditor 属性为 edComboList，或者 设置 EditorType 为 edComboList。

2、提供列表选项。即给 ADVStringGrid 的 Combobox.Items 属性赋值。

示例代码如下：

procedure TfrmGroupUp.grdGetEditorType(Sender: TObject;
  ACol, ARow: Integer; var AEditor: TEditorType);
begin
  case ACol of
    4: //第5列
    begin
      AEditor := edComboList;  //下拉列表
      grd.Combobox.Items := cbbFangShi.Items; //动态设置下拉列表选项
   end;
 end;
end;