关于数据格式化的问题！！急！！在线等待！！(100分)

S

smao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-07

• #1

有没有办法把一个不知道是数值型还是日期型还是字符型的东西格式化成为字符串？

 

C

caidao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-07

• #2

不管是日期型，还是数值型，都可以当成double，bouble当然可以变成字符串了。

 

S

smao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-07

• #3

那么代码应该怎么写呢？

 

S

smao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-07

• #4

如何去写呢？

 

迷

迷糊

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-07

• #5

用变体类型variant
var
a:variant;
b:string;
...
a:=yourdata; //yourdata可以是数值型、日期型、字符型
b:=a;

 

L

lncd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-07

• #6

var
a:TDateTime;
b:string;
begin
a:=now();
b:=floattostr(a);
self.caption:=b;
end;

 

D

delphihouse

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-07

• #7

有一个方法，先得到把该字段的类型
方法如下所示
if dataset.field.datatype = ftfloat then
result := dataset.fields.asstring;
if dataset.field.datatype = ftDateTime then
result := dataset.fields.asDateTime;
if dataset.field.datatype = ftString then
result := dataset.fields.asstring;
此方法多用在过滤一个数据集中的数据，得到有用的字段

 

H

hongwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-07

• #8

引用Variants
1、function VarToStr(const V: Variant): string;
2、dataset.fieldbyname('fieldname').asstring

 

S

smao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-07

• #9

多人接受答案了。