View Issue Details

IDProjectCategoryView StatusLast Update
0004411JEDI VCL00 JVCL Componentspublic2008-07-29 11:08
ReporterPatrick123Assigned Toobones 
PrioritynormalSeveritymajorReproducibilityalways
Status resolvedResolutionfixed 
Product Version3.33 
Target VersionFixed in Version3.34 
Summary0004411: TjvSimScope crashes with a divide by zero error.
DescriptionThe easiest way to reproduce this is to add a jvSimscope component to a form.
Set the property Active to true.
Add a jvScopeLine via the properties.
As soon as it is added you get the error. The only way out is to try and delete the scopeline during the interval or end Delphi via the task manager.
Additional InformationThis can be resolved by changing the following function from:

function TJvScopeLineValues.GetItem(Index: Integer): Integer;
begin
  Result := FValues[(Index + FZeroIndex) mod FCount];
end;

Change To:

function TJvScopeLineValues.GetItem(Index: Integer): Integer;
begin
  if FCount = 0 then
    Result := FValues[0]
  else
    Result := FValues[(Index + FZeroIndex) mod FCount];
end;

It is not a perfect fix as it leaves a gap in the scopeline, but it works.
TagsNo tags attached.

Activities

2008-07-29 01:53

 

SimScopeErr.rar (6,371 bytes)

obones

2008-07-29 05:10

administrator   ~0014463

Seeing it with the SVN version and BDS2006

obones

2008-07-29 11:07

administrator   ~0014465

This is now SVN.

Issue History

Date Modified Username Field Change
2008-07-29 00:20 Patrick123 New Issue
2008-07-29 01:53 Patrick123 File Added: SimScopeErr.rar
2008-07-29 05:10 obones Note Added: 0014463
2008-07-29 05:10 obones Status new => confirmed
2008-07-29 11:07 obones Status confirmed => resolved
2008-07-29 11:07 obones Fixed in Version => Daily / SVN
2008-07-29 11:07 obones Resolution open => fixed
2008-07-29 11:07 obones Assigned To => obones
2008-07-29 11:07 obones Note Added: 0014465