s := ''; if QryData.FieldByName('CON_VALUE1').DataType = ftFloat then s := s + FloatToStr(QryData.FieldByName('CON_VALUE1').AsFloat) else s := s + FloatToStr(QryData.FieldByName('CON_VALUE1').AsInteger); if QryData.Fields[0].DataType = ftFloat then s := s + FloatToStr(QryData.Fields[0].AsFloat) else s := s + FloatToStr(QryData.Fields[0].AsInteger); label.caption:= s;其实也可以别管他什么数据类型,全部来个QryData.FieldByName('CON_VALUE1').AsString、QryData.Fields[0].AsString
inttistr(str):整数转化
+:组合字符串
inttistr(str)
s := '';
if QryData.FieldByName('CON_VALUE1').DataType = ftFloat then
s := s + FloatToStr(QryData.FieldByName('CON_VALUE1').AsFloat)
else
s := s + FloatToStr(QryData.FieldByName('CON_VALUE1').AsInteger); if QryData.Fields[0].DataType = ftFloat then
s := s + FloatToStr(QryData.Fields[0].AsFloat)
else
s := s + FloatToStr(QryData.Fields[0].AsInteger);
label.caption:= s;其实也可以别管他什么数据类型,全部来个QryData.FieldByName('CON_VALUE1').AsString、QryData.Fields[0].AsString
貌似不行吧··从数据库取出来的都是字符型的···QryData.FieldByName('CON_VALUE1').asstring都是这样的···我有解决办法了···从select里把值都给转字符型的··然后取出来的值全部strtofloat然后相加··然后再floattostr