Bad exception handling in TFloatField.SetAsString
Original Reporter info from Mantis: Petr-K
-
Reporter name:
Original Reporter info from Mantis: Petr-K
- Reporter name:
Description:
try
f := StrToFloat(AValue);
SetAsFloat(f); <- exception here is hidden by "not valid float"
except
DatabaseErrorFmt(SNotAFloat, [AValue]);
end;
SetAsFloat should be outside of try except.
Patch is included.
Mantis conversion info:
- Mantis ID: 32446
- Build: Revision: 36503
- Platform: independent
- Version: 3.1.1
- Fixed in version: 3.1.1
- Fixed in revision: 37267 (#d99b1973)
- Target version: 3.2.0