起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 144|回复: 5

[问题]平台取字段数据出现异常『未支持的数据类型』【新问题】

[复制链接]
发表于 2007-9-20 11:30:35 | 显示全部楼层 |阅读模式
在窗体里使用了TSQLDataSet组件,
DataSetSRSJJ: TSQLDataSet;

在代码里实现取数据,但是编译时没有问题,但是运行时出现异常,看变量值时出现问题的地方都是显示得到的是未支持的数据类型,请问如何转换类型得到字段的值,代码如下:


     DataSetSRSJJ.Active:=true;
     if  not DataSetSRSJJ.Eof then

             dzje:=DataSetSRSJJ.GetValue('myCurrency').ToString;{myCurrency是带2个小数的数字类型}
            dzrq:=DataSetSRSJJ.GetValue('myData')..ToString; {myData是日期类型}

其他类型的都没有出现问题。
回复

使用道具 举报

发表于 2007-9-20 11:37:02 | 显示全部楼层
类型转换都在 sysutils 下    ,例如 sysutils.DateToStr;sysutils..FloatToStr
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-9-20 11:47:34 | 显示全部楼层
我知道怎么转换,但是现在的得到的类型是object, 怎么转换为字符串
回复 支持 反对

使用道具 举报

发表于 2007-9-20 11:53:41 | 显示全部楼层
helph1. 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给定的值
回复 支持 反对

使用道具 举报

发表于 2007-9-21 16:03:00 | 显示全部楼层
??
回复 支持 反对

使用道具 举报

发表于 2007-9-26 09:03:24 | 显示全部楼层
结了,有问题请重新开帖
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-6-28 07:36 , Processed in 0.039524 second(s), 15 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表