View Issue Details
| ID | Project | Category | View Status | Date Submitted | Last Update |
|---|---|---|---|---|---|
| 0001850 | JEDI VCL | 00 JVCL Components | public | 2004-06-09 23:18 | 2004-06-23 08:42 |
| Reporter | anonymous | Assigned To | remkobonte | ||
| Priority | normal | Severity | minor | Reproducibility | always |
| Status | resolved | Resolution | fixed | ||
| Product Version | |||||
| Target Version | Fixed in Version | ||||
| Summary | 0001850: Exception when using Thousand separator in DisplayFormat with TJvDBCalcEdit | ||||
| Description | When DisplayFormat of TJvDBCalcEdit is set with ThounsandSeparator (',', ie: '#,##0.00'), procedure DataChanged fails because it makes a try to convert DisplayText to Float with StrToFloat. But StrToFloat doesn't convert strings with thounsand separator (Delphi help says it !). So I made an update which convert thousand separator to empty char : In JvDBControls : procedure TJvDBCalcEdit.DataChanged; begin inherited; if Assigned(FDataLink) and Assigned(FDataLink.Field) {and DecimalPlaceRound} then begin EditText := DisplayText; try if EditText <> '' then if ( StrToFloat( ReplaceString( EditText, ThousandSeparator, '')) = 0) and ZeroEmpty then EditText := ''; except end; end; end; | ||||
| Tags | No tags attached. | ||||
| has duplicate | 0001851 | resolved | remkobonte | Bug on changing value on TJvDBCalcEdit when DisplayFormat is set with thousand separator |
|
|
Okay, thanks for the report and fix. I used StrToFloat(TextToValText(EditText)) instead of ReplaceString. Fixed in rev 1.60 |
| Date Modified | Username | Field | Change |
|---|---|---|---|
| 2004-06-09 23:18 | anonymous | New Issue | |
| 2004-06-23 08:42 | remkobonte | Status | new => resolved |
| 2004-06-23 08:42 | remkobonte | Resolution | open => fixed |
| 2004-06-23 08:42 | remkobonte | Assigned To | => remkobonte |
| 2004-06-23 08:42 | remkobonte | Note Added: 0004601 | |
| 2004-06-24 02:01 | remkobonte | Relationship added | has duplicate 0001851 |
