[JVCL-Checkins] dev/JVCL3/run JvLabel.pas,1.35,1.36 - - Redraw label when ImageIndex changes

[Peter T. <pe...@us...>]

Update of /cvsroot/jvcl/dev/JVCL3/run
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2514/run

Modified Files:
	JvLabel.pas 
Log Message:
- Redraw label when ImageIndex changes


Index: JvLabel.pas
===================================================================
RCS file: /cvsroot/jvcl/dev/JVCL3/run/JvLabel.pas,v
retrieving revision 1.35
retrieving revision 1.36
diff -C2 -d -r1.35 -r1.36
*** JvLabel.pas	29 Apr 2004 14:20:53 -0000	1.35
--- JvLabel.pas	29 Apr 2004 19:34:44 -0000	1.36
***************
*** 1071,1083 ****
    begin
      if Images <> nil then
-     begin
-       FNeedsResize := true;
        NonProviderChange;
!     end;
      FImageIndex := Value;
!     if FNeedsResize then
!       AdjustBounds
!     else
!       Invalidate;
    end;
  end;
--- 1071,1079 ----
    begin
      if Images <> nil then
        NonProviderChange;
!     FNeedsResize := true;
      FImageIndex := Value;
!     AdjustBounds;
!     Invalidate;
    end;
  end;