View Issue Details

IDProjectCategoryView StatusLast Update
0005880JEDI VCL00 JVCL Componentspublic2013-12-13 11:24
ReporterdoerkAssigned Toobones 
PrioritynormalSeverityminorReproducibilityalways
Status resolvedResolutionsuspended 
Product Version3.45 
Target VersionFixed in Version 
Summary0005880: D7: TJvValidateEdit (DisplayFormat: dfFloatFix) has wrong values when being set
Descriptionwhen setting the values in a TJvValidateEdit (using AsFloat) wrong values are being set.
Additional Informationdeclaration:
------------------

var
  edLuftPoren: TJvValidateEdit;

  edLuftPoren := TJvValidateEdit.Create(Self);

  with edLuftPoren do
  begin
    Name := 'edLuftPoren';
    Parent := Panel1;
    Left := 10;
    Top := 103;
    Width := 85;
    Height := 21;
    DisplayFormat := dfFloatFixed;
    DecimalPlaces := 1;
    HasMaxValue := True;
    HasMinValue := True;
    MaxValue := 100.000000000000000000;
    TabOrder := 6;
    OnKeyDown := DoOnFloatEditKeyDown;
  end;


setting the value:
------------------

    edLuftPoren.AsFloat := DbGrid1.DataSource.DataSet.FieldByName(SFieldNameLUFTPOREN).AsFloat;

  the actual value is 13, but the value shown is 1000.0
TagsNo tags attached.

Activities

doerk

2012-05-10 08:52

reporter   ~0019750

i am running a german delphi 7 on an english win xp(set up with german regional settings). when i test the same thing on an english delphi on a german win xp everything works fine. checking locale format settings show the same results on both test systems.
i think this issue is be connected to regional settings of delphi or windows, but that is quite hard to track down from here.

obones

2012-06-11 17:33

administrator   ~0019868

Please use the latest SVN version and provide the zipped sources of a sample application showing this.

obones

2013-12-13 11:24

administrator   ~0020774

No news, suspending the issue

Issue History

Date Modified Username Field Change
2012-05-09 19:03 doerk New Issue
2012-05-10 08:52 doerk Note Added: 0019750
2012-06-11 17:33 obones Note Added: 0019868
2012-06-11 17:33 obones Status new => feedback
2013-12-13 11:24 obones Note Added: 0020774
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