View Issue Details

IDProjectCategoryView StatusLast Update
0001851JEDI VCL00 JVCL Componentspublic2004-06-24 02:01
ReporteranonymousAssigned Toremkobonte 
PrioritynormalSeverityminorReproducibilityalways
Status resolvedResolutionduplicate 
Product Version 
Target VersionFixed in Version 
Summary0001851: Bug on changing value on TJvDBCalcEdit when DisplayFormat is set with thousand separator
DescriptionWhen changing value on formated TJvDBCalcEdit (ie. when DisplayFormat has thousand separator ('#,##0.00' with ' ' for thousand separator) and cursor is at thousand separator : 1| 128.45), key pressed is inserted at the begining of text (so if key is '4' then '41 128.45').

It seems to be due to inherited DataChanged which changes EditText. I made changes (add the 'and not Focused' code, code is at bottom of message) to avoid this bug but when component is focused, format is lost.

Note : it seems very strange because FormatOnEditing property is set to False ...

procedure TJvDBCalcEdit.DataChanged;
begin
  inherited;
  if Assigned(FDataLink) and Assigned(FDataLink.Field) and not Focused {and DecimalPlaceRound} then
  begin
    EditText := DisplayText;
    try
      if EditText <> '' then
        if ( StrToFloat( ReplaceString( EditText, ThousandSeparator, '')) = 0) and ZeroEmpty then
          EditText := '';
    except
    end;
  end;
end;
TagsNo tags attached.

Relationships

duplicate of 0001850 resolvedremkobonte Exception when using Thousand separator in DisplayFormat with TJvDBCalcEdit 

Activities

remkobonte

2004-06-24 02:01

developer   ~0004608

Duplicate of 0001850

Issue History

Date Modified Username Field Change
2004-06-10 00:18 anonymous New Issue
2004-06-24 02:01 remkobonte Status new => resolved
2004-06-24 02:01 remkobonte Resolution open => duplicate
2004-06-24 02:01 remkobonte Relationship added duplicate of 0001850
2004-06-24 02:01 remkobonte Assigned To => remkobonte
2004-06-24 02:01 remkobonte Note Added: 0004608