DELPHI基础教程：数据访问部件的应用及编程（三）[2]

字段输入模式编辑器

在字段输入模式编辑中可以选择一种输入模式而且在TestInput编辑框中输入字段值进行检验

因为TStringField类型的字段部件没有DisplayFormat属性但是可以把EditMask属性当DisplayFormat属性使用

设定字段的显示和编辑格式

Delphi本身为某些类型的字段对象提供了设定其显示和编辑格式的例程并且为字段部件的DisplayFormat和EditFormat属性指定了缺省值例如对于与浮点型数值字段对应的TFloatField类型的字段部件而且该字段部件的Currency属性设置为True 时字段值的显示格式为$编辑格式是表是Delphi提供了设置字段显示和编辑格式的例程

表 字段格式例程

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

例 程 名 运用的字段对象

─────────────────────────────

FormatFloat TFloatFieldTCurrencyField

FormatDateTime TDateFieldTTimeFieldTDateTimeField

FormatInteger TIntegerFieldTSmallIntFieldTWordField

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

上述这些用于设定日期时间类型数值型以及货币型字段的显示和编辑格式的例程都是按国际上通行格式来设定相应类型字段的格式的用户可以自己设置字段部件的DisplayFormat和EditFormat属性来设定适合自己使用的格式还可以为有关字段对象的OnGetText和OnSetText事件编写代码来设定字段的显示和编辑格式

字段部件的事件及应用

字段部件常需处理的事件如表所示

表 字段部件的事件

━━━━━━━━━━━━━━━━━━━━━━━━━━━━

事件名 用 途

────────────────────────────

OnChange 当字段部件的字段值发生改变时触发该事件

OnGetText 当字段部件获得字段值时触发该事件

OnSetText 当字段部件被设置字段值时触发该事件

OnValidata 当字值被修改或插入新的字段值时对字段值进行有效性检验时触发该事件

━━━━━━━━━━━━━━━━━━━━━━━━━━━━

用户想自己设定字段的显示和编辑格式时可以编写OnGetText事件和OnSetText事件的处理过程以达到设定字段的显示和编辑格式

字段部件的类型转换函数及使用

字段部件具有一些内部函数用于转换字段值的类型对于不同的字段类型这些转换函数的作用是不一样的表概括了不同类型的字段及转换函数的作用

表 字段部件的转换函数

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

字段类型 AsString AsInteger AsFloat AsDatetime AsBoolean

────────────────────────────────────

TStringField 转换成 转换成整数 若能转换 日期 转换成布型

Stringg型 （若能转换） 则转换成 （若能转换）

────────────────────────────────────

TIntegerField

TSmallField 字符型 整数型 浮点型 不允许 不允许转换

TWordField

────────────────────────────────────

TFloatField

TCurrencyField 字符串型 捨入成整数 浮点型 不允许 不允许

TBCDField

────────────────────────────────────

TDateField

TDateTimeField 字符串 不允许 浮点数 日期型 不允许

TTimeField

────────────────────────────────────

TBooleanField 转换成Time 不允许 不允许 不允许 布尔型或False

────────────────────────────────────

[] [] [] []