在表中定义两个字段为:
TEngMon_Absence float DEFAULT 1 NOT NULL ,
TEngMon_NormalOT float DEFAULT 1 NOT NULL ,在SQL2K中查表看到是1.0Delphi中代码:
m_dfAbsenceDay := ADOQuery1.FieldByName('TEngMon_Absence').AsFloat;
m_dfNormalOT:= ADOQuery1.FieldByName('TEngMon_NormalOT' ).AsFloat;edAbsence.Text := FormatFloat('0.00', m_dfAbsenceDay);
edNormalOT.Text := FormatFloat('0.00', m_dfNormalOT);edAbsence.Text赋值时没问题,edNormalOT.Text赋值时出EConvertError异常:
''' is not a valid floating point value'我自己重写过FormatFloat,用Format,临时变量值正确,交给result就出错。
?????????
TEngMon_Absence float DEFAULT 1 NOT NULL ,
TEngMon_NormalOT float DEFAULT 1 NOT NULL ,在SQL2K中查表看到是1.0Delphi中代码:
m_dfAbsenceDay := ADOQuery1.FieldByName('TEngMon_Absence').AsFloat;
m_dfNormalOT:= ADOQuery1.FieldByName('TEngMon_NormalOT' ).AsFloat;edAbsence.Text := FormatFloat('0.00', m_dfAbsenceDay);
edNormalOT.Text := FormatFloat('0.00', m_dfNormalOT);edAbsence.Text赋值时没问题,edNormalOT.Text赋值时出EConvertError异常:
''' is not a valid floating point value'我自己重写过FormatFloat,用Format,临时变量值正确,交给result就出错。
?????????
m_dfNormalOT: Double;
Format('%8.2g', [m_dfNormalOT] );
也试过,不行。是不是其它地方的代码有问题,造成栈空间出错?
edAbsence.Text := ADOQuery1.FieldByName('TEngMon_Absence').AsString;
edNormalOT.Text := ADOQuery1.FieldByName('TEngMon_NormalOT' ).AsString;
没有问题的!