View Issue Details

IDProjectCategoryView StatusLast Update
0001493JEDI VCL00 JVCL Componentspublic2004-03-18 14:20
ReporterricoleboAssigned Touser72 
PrioritynormalSeverityminorReproducibilityalways
Status resolvedResolutionfixed 
Product Version 
Target VersionFixed in Version 
Summary0001493: JvPageControl caption in unit JvComCtrls
DescriptionJvPageControl caption haven't the good index when
some tabSheet are not visible.

in procedure TJvPageControl.DrawShadowTab() and
TJvPageControl.DrawDefaultTab()
to find the realIndex of the page the code is :
 RealIndex := TabIndex;
 while not Pages[RealIndex].TabVisible do
   Inc(RealIndex);

It should be :

  RealIndex := 0;
  i := 0;
  while ((i <= TabIndex+RealIndex)) do
  begin
    if not Pages[i].TabVisible then Inc(RealIndex);
    Inc(i);
  end;
  RealIndex := RealIndex + TabIndex;



Additional InformationTo reproduce the bug create 4 tabSheets and set the second
to visible = false

=> tabSheet 4 caption = tabSheet 3 caption
TagsNo tags attached.

Activities

user72

2004-03-18 14:20

  ~0003382

Updated in CVS. Thanks

Issue History

Date Modified Username Field Change
2004-03-18 10:04 ricolebo New Issue
2004-03-18 14:20 user72 Status new => resolved
2004-03-18 14:20 user72 Resolution open => fixed
2004-03-18 14:20 user72 Assigned To => user72
2004-03-18 14:20 user72 Note Added: 0003382