1. ObjectHelper
ObjectHelper提供了各种数据类型之间相互转换的函数,这里提供的函数比较简单,推荐使用
1.1. 相关属性和方法
static function ToBoolean(o: TObject; Default: Boolean): Boolean; overload;
static function ToBoolean(o: TObject): Boolean; overload;
任意类型转换成Boolean类型
o: TObject 需要转换的数据
Default: Boolean 缺省值,如果转换错误,那么函数值取Default给定的值
static function ToChar(o: TObject; Default: Char): Char; overload;
static function ToChar(o: TObject): Char; overload;
任意类型转换成Char类型
o: TObject 需要转换的数据
Default: Char 缺省值,如果转换错误,那么函数值取Default给定的值
static function ToDelphiDateTime(o: TObject; Default: Double): Double; overload;
static function ToDelphiDateTime(o: TObject): Double; overload;
任意类型转换成TDateTime类型
o: TObject 需要转换的数据
Default: TDateTime 缺省值,如果转换错误,那么函数值取Default给定的值
static function ToFloat(o: TObject): Double; overload;
static function ToFloat(o: TObject; Default: Double): Double; overload;
任意类型转换成Double类型
o: TObject 需要转换的数据
Default: Double 缺省值,如果转换错误,那么函数值取Default给定的值
static function ToInt(o: TObject; Default: Longint): Longint; overload;
static function ToInt(o: TObject): Longint; overload;
static function ToInt64(o: TObject; Default: Int64): Int64; overload;
static function ToInt64(o: TObject): Int64; overload;
任意类型转换成整数类型
o: TObject 需要转换的数据
Default: Int64 缺省值,如果转换错误,那么函数值取Default给定的值
static function ToString(o: TObject): string; overload;
static function ToString(o: TObject; Default: string): string; overload;
任意类型转换成字符串String类型
o: TObject 需要转换的数据
Default: String 缺省值,如果转换错误,那么函数值取Default给定的值
1.2. 用法示例
切换行号显示
1 var
2 lParam: TBizParam;
3 lTime: TDateTime;
4 begin
5 lParam := SystemUtils.TContextUtils.GetParam(Context, 'Biz:\SYSTEM\DATATIMEPARAMS.PARAMGROUP', 'ServerDate');
6 jsDialogs.ShowMsg(ObjectHelper.ToString(lParam.Value), '当前日期1');
7 lTime := ObjectHelper.ToDelphiDateTime(lParam.Value);
8 jsDialogs.ShowMsg(ObjectHelper.ToString(lTime), '当前日期2'); |