Explorar o código

Added missing published Visible property

Andreas Hausladen %!s(int64=13) %!d(string=hai) anos
pai
achega
36f720b9ec
Modificáronse 1 ficheiros con 2 adicións e 1 borrados
  1. 2 1
      Components/NewProgressBar.pas

+ 2 - 1
Components/NewProgressBar.pas

@@ -49,8 +49,9 @@ type
     property Min: LongInt read FMin write SetMin;
     property Max: LongInt read FMax write SetMax;
     property Position: LongInt read FPosition write SetPosition default 0;
-    property State: TNewProgressBarState read FState write SetState default npbsNormal;   
+    property State: TNewProgressBarState read FState write SetState default npbsNormal;
     property Style: TNewProgressBarStyle read FStyle write SetStyle default npbstMarquee;
+    property Visible default True;
   end;
 
 procedure Register;