最近研究了一下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的右侧。如下图:
|
对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 时的样式见下图:
是否显示合计值,与Grid的Summary的属性联合使用。
是否允许进行排序操作。允许排序操作时,在字段名称旁显示排序符号,并且在Menu中的排序菜单是可用的,如下图:
对该字段进行编辑时,对应的单元采用怎样的控件进行处理,这个功能非常强大,如设置TuniComboBox作为Editor则完全替代字段Picklist的功能,如下图:
对列标题下拉显示的菜单进行控制
属性
|
类型
|
说明
|
ColoumnHideable
|
Boolean
|
是否允许隐藏字段,缺省True,即允许用户通过勾选隐藏指定的列,如下图:
|
MenuEnabled
|
Boolean
|
是否允许显示列的菜单
|
MenuText
|
String
|
该列显示在菜单上的文字,缺省为空,表示显示字段DisplayLabel,否则显示该文字。如下图:
|
当该字段需要显示图片时,联合使用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;
|
该方法可以让列显示某项图片按钮,如:
|