View Issue Details
| ID | Project | Category | View Status | Date Submitted | Last Update |
|---|---|---|---|---|---|
| 0005878 | JEDI VCL | 00 JVCL Components | public | 2012-05-08 20:54 | 2013-12-13 11:24 |
| Reporter | limagito | Assigned To | obones | ||
| Priority | normal | Severity | major | Reproducibility | have not tried |
| Status | resolved | Resolution | suspended | ||
| Product Version | 3.45 | ||||
| Target Version | Fixed in Version | ||||
| Summary | 0005878: TJvAppDBStorage doesn't store empty strings | ||||
| Description | You can't store empty strings using the TJvAppDBStorage | ||||
| Additional Information | JvAppDBStorage.pas function TJvCustomAppDBStorage.DoReadString(const Path: string; const Default: string): string; var Section: string; Key: string; begin SplitKeyPath(Path, Section, Key); Result := ReadValue(Section, Key); //THE REASON IS THE FOLLOWING 2 LINES OF CODE if Result = '' then Result := Default; end; Should be: | ||||
| Tags | No tags attached. | ||||
|
|
Should be: function TJvCustomAppDBStorage.DoReadString(const Path: string; const Default: string): string; var Section: string; Key: string; begin SplitKeyPath(Path, Section, Key); if ValueExists(Section, Key, False) then Result := ReadValue(Section, Key) else Result := Default; end; |
|
|
Please use the latest SVN version and provide the zipped sources of a sample application showing this. |
|
|
No news, suspending the issue |
| Date Modified | Username | Field | Change |
|---|---|---|---|
| 2012-05-08 20:54 | limagito | New Issue | |
| 2012-05-08 21:12 | limagito | Note Added: 0019746 | |
| 2012-06-11 17:33 | obones | Note Added: 0019867 | |
| 2012-06-11 17:33 | obones | Status | new => feedback |
| 2013-12-13 11:24 | obones | Note Added: 0020773 | |
| 2013-12-13 11:24 | obones | Status | feedback => resolved |
| 2013-12-13 11:24 | obones | Resolution | open => suspended |
| 2013-12-13 11:24 | obones | Assigned To | => obones |