Question

delphi ADVStringGrid 怎么显示下拉列表

Answer 1

如果是想要将 AdvStringGrid 表格中的某个单元格（某列、某行），点击时出现下拉列表供用户选择，其操作要点如下：

响应 OnGetEditorType 事件，设置其 EditorType 为 edComboList，如果表格中编辑手段最多的是使用下拉列表方式，可以直接设置 DefaultEditor 属性为 edComboList。

代码示例：

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;
     //5: //其他列 ......
 end;
end;

 

下拉列表示例截图：