最近研究了一下UniGUI的TuniDBGrid,记录一下免得忘记了。
TuniDBGrid的重要属性包括:
1、列—TUniDBGridColumns和TUniDBGridColumn
每个列对象(TUniDBGridColumn)的重要属性包括:
- CheckBoxField : TUniCheckBoxField
列作为CheckBox操作的相关属性
属性 |
类型 |
说明 |
AutoPost |
Boolean |
当用户点选CheckBox后,改变前端显示并根据该属性决定: True—立即自动提交到数据集中并刷新前端显示 False—只改变前端显示,当记录滚动时再提交数据集 |
BooleanFieldOnly |
Boolean |
是否只针对Boolean字段, True—只能识别Boolean字段,非Boolean字段将不能显示CheckBox False—DisplayValues和FieldValues可以针对非Boolean字段进行处理 |
Enabled |
Boolean |
是否允许显示CheckBox |
DisplayValues/ FieldValues |
string |
联合决定了CheckBox不同状态下对应的值,FieldValues存储字段值,DisplayValues存储显示文字,如果空白就表示不显示文字,只显示CheckBox,每个值通过分号(;)区分,文字显示CheckBox的右侧。如下图: |
- DisplayMemo:Boolean
对TMemoField而言,是否显示(Memo)字样,缺省为False
False—不显示字段内容,显示(Memo)字样
True—不显示(Memo)字样,而是直接显示字段内容
- Filtering : TUniColumnFilter
在列标题下显示过滤编辑框,自动对列数据进行过滤,如下图:
参考Demos下的GridFilter例子。要实现该功能,必须:
A.放一个TUniHiddenPanel控件在窗体上,然后将TUniEdit、TUniComboBox 、TUniDBLookupComboBox等控件放置在这个隐藏的Panel上,如下图:
B.设置每个列的Filtering,将其Editor属性设置对应的编辑控件
C. 对编辑控件进行相关属性设置,如TUniDBLookupComboBox需要设置ListSource等
属性 |
类型 |
说明 |
ChangeDelay |
Integer |
当用户键入字符后,延时进行过滤处理的毫秒数 |
Editor |
TControl |
过滤的输入框,按照输入框内容进行过滤。TUniDBLookupComboBox按照KeyField的值进行过滤 |
Enabled |
Boolean |
是否允许进行过滤 |
- GroupHeader和GroupHeaderSeparator
多栏显示表头,如GroupHeader = a;b;c 时的样式见下图:
- ShowSummary:Boolean
是否显示合计值,与Grid的Summary的属性联合使用。
- Sortable:Boolean
是否允许进行排序操作。允许排序操作时,在字段名称旁显示排序符号,并且在Menu中的排序菜单是可用的,如下图:
- Editor : TControl;
对该字段进行编辑时,对应的单元采用怎样的控件进行处理,这个功能非常强大,如设置TuniComboBox作为Editor则完全替代字段Picklist的功能,如下图:
- Memu(TUniColumnMenu)
对列标题下拉显示的菜单进行控制
属性 |
类型 |
说明 |
ColoumnHideable |
Boolean |
是否允许隐藏字段,缺省True,即允许用户通过勾选隐藏指定的列,如下图: |
MenuEnabled |
Boolean |
是否允许显示列的菜单 |
MenuText |
String |
该列显示在菜单上的文字,缺省为空,表示显示字段DisplayLabel,否则显示该文字。如下图: |
- ImageOptions
当该字段需要显示图片时,联合使用ImageOptions属性和OnFieldImage事件,其中:
属性 |
类型 |
说明 |
Height/Width |
Integer |
显示图片的大小 |
Visible |
Boolean |
是否显示图片,True则触发OnFieldImage事件进行图片处理,如: procedure TMainForm.UniDBGrid1FieldImage(const Column: TUniDBGridColumn; const AField: TField; var OutImage: TGraphic; var DoNotDispose: Boolean; var ATransparent: TUniTransparentOption); begin if SameText(AField.FieldName, 'gender') then begin // 代码处理图片 DoNotDispose := True; // 根据字段值返回图片 if AField.AsString = 'male' then OutImage := UniImage1.Picture.Graphic else if AField.AsString = 'female' then OutImage := UniImage2.Picture.Graphic; end; end; |
该方法可以让列显示某项图片按钮,如: