DBGrid 单击弹出PickList
type myGrid = class(TCustomGrid) end; type myInplaceEditList = class(TInplaceEditList) end; procedure TDemoForm.gdDemoGridCellClick(Column: TColumn); begin Column.Field.FocusControl; Column.DropDownRows := 20; myInplaceEditList(myGrid(grdColorSize).InplaceEditor).DropDown; end;
温馨提示: 本文由Jm博客推荐,转载请保留链接: https://www.jmwww.net/SQL/24920.html
- 上一篇:PostgreSQL12体验
- 下一篇:mysql生成百万级数量测试数据(超简单)