从数据库取值相加,数据库是字符类型,里面浮点型数字还有整型
现在从数据库取几个值然后相加赋值给label,要怎么进行格式转换?
取出来的值例如是:str1,str2,str3
label.caption:=
[解决办法]
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;