[JVCL-Checkins] SF.net SVN: jvcl:[12949] trunk/jvcl/run/JvFooter.pas

[<ah...@us...>]

Revision: 12949
          http://jvcl.svn.sourceforge.net/jvcl/?rev=12949&view=rev
Author:   ahuser
Date:     2010-12-01 17:51:36 +0000 (Wed, 01 Dec 2010)

Log Message:
-----------
Mantis #5432: TJVFooter.Pas: Patch for correct button-position even if some buttons are not visible 

Modified Paths:
--------------
    trunk/jvcl/run/JvFooter.pas

Modified: trunk/jvcl/run/JvFooter.pas
===================================================================
--- trunk/jvcl/run/JvFooter.pas	2010-12-01 07:51:20 UTC (rev 12948)
+++ trunk/jvcl/run/JvFooter.pas	2010-12-01 17:51:36 UTC (rev 12949)
@@ -275,7 +275,8 @@
   procedure DoTheCount(Idx: Integer);
   begin
     if (Controls[Idx] is TJvFooterBtn) and
-      (TJvFooterBtn(Controls[Idx]).Alignment = AAlignment) then
+      (TJvFooterBtn(Controls[Idx]).Alignment = AAlignment) and
+      (TJvFooterBtn(Controls[Idx]).Visible or (csDesigning in ComponentState)) then
     begin
       Inc(BtnCount);
       Inc(BtnTotalSpc, TJvFooterBtn(Controls[Idx]).SpaceInterval);


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.