！！！一个有关数据类型和QuickReport的剧恶问题，高手请帮忙！！！(200分)

N

neutron

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-17

• #1

[blue][?]ADO MDAC2.7 + SqlServer2000 SP1 + Delphi6 SP1 + QuickReport3.5 Pro
使用了计算公式如
Express = SUM(ADODataSet1.New_Hosts)
现在有一个巨恶无比的问题，我试过了，字段使用Sql Server的int型和float型的，
QRExpress中会有值，然而我的数据库里大部分设成了bigint的值，他就算不出来...
有否高手见过这个问题，如何解答，这涉及到一个做了一年的项目，小弟感激不尽！
请不要让我去改数据库，又及。[]
顺便说，我们公司用的是正版，所以把电话打到了Borland，那里的工程师居然说
QReport是第三方的，他们不负责技术支持！！！faint[/blue]

 

N

netatom

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #2

Express = SUM(StrToNumber(Str(ADODataSet1.New_Hosts)))行不行?
我没有过SqlServer,不知道这样行不行得通.

 

N

neutron

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #3

好象不行，就连原来能算出来的int也算不出来拉[?]

 

N

netatom

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #4

改一改QuickRep目录里的QrExpr.pas;
TQREvResultType = (resInt, resDouble, resString, resBool, resError);
TQREvResult = record
case Kind : TQREvResultType of
resInt : (intResult : longint);
^^^^^^^^ 这里是32位
resDouble : (dblResult :do
uble);
resString : (strResult : string[255]);
resBool : (booResult : boolean);
end;
我没试过,只能给你提供一种思路.

 

U

ugvanxk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #5

对不起，我用BDE
Query:select SUM(New_Hosts) from tablename
Quickrep1.Qrlabel:=Qurey1.fieldbyname('').asstring;

 

悟

悟空

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #6

Expression = SUM(ADODataSet1.New_Hosts) 不行??
用
sql.Add('select sum(field1) as a, sum(field2) as b from table1');
使用时要把requestLive设为false

 

N

neutron

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-21

• #7

谢谢大家，相信这绝对是QuickReport程序的一个问题[:I]