如何控制字段的表现

atiger

字段可以将实际存储的数据类型和表现类型分开，使一个字段可以根据其数据类型有多种表现形式，从而实现更加友好的界面风格。

字段的表现可以在许多地方设置，例如：“金额”字段，有些地方需要实现人民币大写；有些地方需要小写；有的地方需要将0显示出来（编辑时）；有的地方不需要显示（打印时），可以通过以下方法来设置其表现类型。

atiger

1、在“字段”的“表现类型”中设置。例如：人民币的大小写转换；整数型字段表现为：CheckBox 。

2、如果想实现输出时，例如金额为0时不要打印出来，编辑时显示0，可以在“编辑属性|OutputText”中设置表达式就可以。例如，设置：IIf(self=0,null,self)  。

3、字段的事件中还可以实现一些表现和实际存储不一样。 例如：如果字段本身的类型是字符型，而表现为日期时间字符型，参考如下：

3.1、在字段的 OnGetAsTimeStamp 事件中写
Value := Business.Data.SqlTimSt.StrToSQLTimeStamp(Field.AsString);

3.2、在字段的 OnSetAsTimeStamp 事件中写
Field.AsString := Business.Data.SqlTimSt.SQLTimeStampToStr('yyyy-mm-dd',Value);
如果是字符型的字段，那么首先触发的是OnGetAsString 和 OnSetAsString ，这是字段的基础事件。例如：

Procedure TSJB1.FieldZD3GetAsString(Field: TDataField; var Value: String);
begin
  Value := SysUtils.Format('%s0101', [Field.AsString]);
end;.

Procedure TSJB1.FieldZD3SetAsString(Field: TDataField;const Value: String);
begin
  Field.AsString := StringUtils.Copy(Value, 1, 4);
  //那么结果肯定是只替换前面四位，后四位为：0101
end;

3.3、如果整数型字段，那么 OnGetAsInteger 和 OnSetAsInteger 是最基础的。

3.4、如果浮点型字段，那么OnGetAsFloat 和 OnSetAsFloat 是最基础的。

3.5、如果数字型字段，那么OnGetAsBCD 和 OnSetAsBCD 是最基础的。

3.6、如果日期时间型，那么OnGetAsTimeStampe 和 OnSetAsTimeStampe 是最基础的 。

atiger

1、数据集，步骤如下：

1.1、选中需要定义的数据集。

1.2、选中数据集的右键菜单的“字段编辑器”选项，可以设置，参考数据字典层的设置。

1.3、只有“用户数据字段”和“临时字段”才可以设置，其他的都不可以。


2、文档（目前只有“表格文档（JustCell）”可以设置），步骤如下：

2.1、选中需要设置的单元格。

2.2、选中该单元格的右键菜单“设置单元格格式” 。

2.3、在对话框的“格式”页面中，设置“分类”等选项即可。

2.4、如果在表格文档（JustCell）中，需要设置特殊的表现，例如对齐方式等，那么需要将“设置单元格格式”的“格式”页面中选中非“常规”那个类，否则不起作用（因为常规，系统就默认是数据字段层的定义）。

atiger

这些特性是一层一层受影响的，底层的设置肯定对上层是有影响的，但如果上层重新定义，那么以上层为准。例如在“数据字典”层定义这些特性，那么由它生成数据集都会有影响；在“数据集”上定义这些特性，会影响所有由该数据集生成的文档；在“文档”上定义这些特性，会影响所有由该文档存在功能。