published Enabled property on all (most) components

* Now the UI Designer can work with that property too
* A few other components got one or two other properties published too.

18 files changed, 51 insertions, 20 deletions

diff --git a/src/gui/fpg_button.pas b/src/gui/fpg_button.pas
index f2bda769..2c2959f1 100644
--- a/src/gui/fpg_button.pas
+++ b/src/gui/fpg_button.pas
@@ -133,6 +133,7 @@ type
     property    Default;
     property    Down;
     property    Embedded;
+    property    Enabled;
     property    Flat;
     property    FontDesc;
     property    GroupIndex;
diff --git a/src/gui/fpg_checkbox.pas b/src/gui/fpg_checkbox.pas
index a075a4cd..156459b4 100644
--- a/src/gui/fpg_checkbox.pas
+++ b/src/gui/fpg_checkbox.pas
@@ -68,6 +68,7 @@ type
     property    BackgroundColor;
     property    BoxLayout;
     property    Checked;
+    property    Enabled;
     property    FontDesc;
     property    Height;
     property    Hint;
diff --git a/src/gui/fpg_colorwheel.pas b/src/gui/fpg_colorwheel.pas
index 22ab15cc..c2282e95 100644
--- a/src/gui/fpg_colorwheel.pas
+++ b/src/gui/fpg_colorwheel.pas
@@ -63,6 +63,7 @@ type
     procedure   SetSelectedColor(const NewColor: TfpgColor);
   published
     property    BackgroundColor;
+    property    Enabled;
     property    ValueBar: TfpgValueBar Read FValueBar Write SetValueBar;
     property    MarginWidth: longint Read FMarginWidth Write SetMarginWidth default 5;
     property    CursorSize: longint Read FCursorSize Write SetCursorSize default 5;
@@ -99,6 +100,7 @@ type
     procedure   SetHS(Hue: longint; Sat: double);
   published
     property    BackgroundColor;
+    property    Enabled;
     property    Value: double Read FValue Write SetValue;
     property    SelectedColor: TfpgColor Read GetSelectedColor;
     property    MarginWidth: longint Read FMarginWidth Write SetMarginWidth;
diff --git a/src/gui/fpg_combobox.pas b/src/gui/fpg_combobox.pas
index 632a4918..26ae8b0c 100644
--- a/src/gui/fpg_combobox.pas
+++ b/src/gui/fpg_combobox.pas
@@ -137,6 +137,7 @@ type
   published
     property    BackgroundColor default clBoxColor;
     property    DropDownCount;
+    property    Enabled;
     property    ExtraHint;
     property    FocusItem;
     property    FontDesc;
diff --git a/src/gui/fpg_edit.pas b/src/gui/fpg_edit.pas
index a3207f6a..8e5ec641 100644
--- a/src/gui/fpg_edit.pas
+++ b/src/gui/fpg_edit.pas
@@ -163,6 +163,7 @@ type
     property    AutoSize;
     property    BackgroundColor default clBoxColor;
     property    BorderStyle;
+    property    Enabled;
     property    ExtraHint;
     property    FontDesc;
     property    HeightMargin;
@@ -258,6 +259,7 @@ type
     property    Text;
   published
     property    CustomThousandSeparator;
+    property    Enabled;
     property    Hint;
     property    NegativeColor;
     property    ParentShowHint;
@@ -298,6 +300,7 @@ type
     property    CustomDecimalSeparator;
     property    CustomThousandSeparator;
     property    Decimals: integer read FDecimals write SetDecimals default -1;
+    property    Enabled;
     property    FixedDecimals: boolean read FFixedDecimals write SetFixedDecimals default False;
     property    Hint;
     property    NegativeColor;
@@ -337,6 +340,7 @@ type
     property    CustomDecimalSeparator;
     property    CustomThousandSeparator;
     property    Decimals: integer read FDecimals write SetDecimals default 2;
+    property    Enabled;
     property    Hint;
     property    NegativeColor;
     property    ParentShowHint;
@@ -344,6 +348,7 @@ type
     property    ShowHint;
     property    ShowThousand default True;
     property    TabOrder;
+    property    TextColor;
     property    Value: Currency read GetValue write SetValue;
     property    OnChange;
     property    OnEnter;
diff --git a/src/gui/fpg_editbtn.pas b/src/gui/fpg_editbtn.pas
index 70c6da00..2d972744 100644
--- a/src/gui/fpg_editbtn.pas
+++ b/src/gui/fpg_editbtn.pas
@@ -70,14 +70,15 @@ type
   public
     constructor Create(AOwner: TComponent); override;
   published
-    property ExtraHint;
-    property FileName: TfpgString read GetFileName write SetFileName;
-    property InitialDir: TfpgString read FInitialDir write FInitialDir;
-    property Filter: TfpgString read FFilter write SetFilter;
-    property ReadOnly;
-    property TabOrder;
-    property OnButtonClick;
-    property OnShowHint;
+    property    Enabled;
+    property    ExtraHint;
+    property    FileName: TfpgString read GetFileName write SetFileName;
+    property    InitialDir: TfpgString read FInitialDir write FInitialDir;
+    property    Filter: TfpgString read FFilter write SetFilter;
+    property    ReadOnly;
+    property    TabOrder;
+    property    OnButtonClick;
+    property    OnShowHint;
   end;
 
 
@@ -92,13 +93,14 @@ type
   public
     constructor Create(AOwner: TComponent); override;
   published
-    property Directory: TfpgString read GetDirectory write SetDirectory;
-    property ExtraHint;
-    property RootDirectory: TfpgString read FRootDirectory write FRootDirectory;
-    property ReadOnly;
-    property TabOrder;
-    property OnButtonClick;
-    property OnShowHint;
+    property    Directory: TfpgString read GetDirectory write SetDirectory;
+    property    Enabled;
+    property    ExtraHint;
+    property    RootDirectory: TfpgString read FRootDirectory write FRootDirectory;
+    property    ReadOnly;
+    property    TabOrder;
+    property    OnButtonClick;
+    property    OnShowHint;
   end;
 
 
@@ -111,11 +113,13 @@ type
   public
     constructor Create(AOwner: TComponent); override;
   published
-    property FontDesc: TfpgString read GetFontDesc write SetFontDesc;
-    property ReadOnly;
-    property TabOrder;
-    property OnButtonClick;
-    property OnShowHint;
+    property    Enabled;
+    property    ExtraHint;
+    property    FontDesc: TfpgString read GetFontDesc write SetFontDesc;
+    property    ReadOnly;
+    property    TabOrder;
+    property    OnButtonClick;
+    property    OnShowHint;
   end;
 
 
diff --git a/src/gui/fpg_grid.pas b/src/gui/fpg_grid.pas
index 112a1f33..51ef8646 100644
--- a/src/gui/fpg_grid.pas
+++ b/src/gui/fpg_grid.pas
@@ -133,6 +133,7 @@ type
     property    ColumnWidth;
     property    DefaultColWidth;
     property    DefaultRowHeight;
+    property    Enabled;
     property    FocusCol;
     property    FocusRow;
     property    FontDesc;
diff --git a/src/gui/fpg_label.pas b/src/gui/fpg_label.pas
index eeecf9b6..88986549 100644
--- a/src/gui/fpg_label.pas
+++ b/src/gui/fpg_label.pas
@@ -71,6 +71,7 @@ type
     property    Alignment;
     property    AutoSize;
     property    BackgroundColor;
+    property    Enabled;
     property    FontDesc;
     property    Height;
     property    Hint;
diff --git a/src/gui/fpg_listbox.pas b/src/gui/fpg_listbox.pas
index 179e0e81..6aea07ba 100644
--- a/src/gui/fpg_listbox.pas
+++ b/src/gui/fpg_listbox.pas
@@ -135,6 +135,7 @@ type
     property    AutoHeight;
     property    BackgroundColor default clListBox;
     property    DragToReorder;
+    property    Enabled;
     property    FocusItem;
     property    FontDesc;
     property    Hint;
@@ -197,6 +198,7 @@ type
     property    Color;
     property    ColorPalette;
     property    DragToReorder;
+    property    Enabled;
     property    FocusItem;
     property    FontDesc;
     property    Hint;
diff --git a/src/gui/fpg_listview.pas b/src/gui/fpg_listview.pas
index 12ed4364..b79d0ab0 100644
--- a/src/gui/fpg_listview.pas
+++ b/src/gui/fpg_listview.pas
@@ -250,6 +250,7 @@ type
     function    NewItem: TfpgLVItem;
   published
     property    Columns: TfpgLVColumns read FColumns;
+    property    Enabled;
     property    HScrollBar: TfpgScrollBar read FHScrollBar;
     property    ItemHeight: Integer read GetItemHeight;
     property    ItemIndex: Integer read FItemIndex write SetItemIndex;
diff --git a/src/gui/fpg_memo.pas b/src/gui/fpg_memo.pas
index 0cf0f469..d01e757c 100644
--- a/src/gui/fpg_memo.pas
+++ b/src/gui/fpg_memo.pas
@@ -125,6 +125,7 @@ type
     property    PopupMenu: TfpgPopupMenu read FPopupMenu write FPopupMenu;
   published
     property    BackgroundColor default clBoxColor;
+    property    Enabled;
     property    FontDesc: string read GetFontDesc write SetFontDesc;
     property    Hint;
     property    Lines: TStringList read FLines;
diff --git a/src/gui/fpg_panel.pas b/src/gui/fpg_panel.pas
index 1446283f..c3f42e5d 100644
--- a/src/gui/fpg_panel.pas
+++ b/src/gui/fpg_panel.pas
@@ -75,6 +75,7 @@ type
   published
     property    BackgroundColor;
     property    BorderStyle;
+    property    Enabled;
     property    Height;
     property    Hint;
     property    Left;
@@ -132,6 +133,7 @@ type
     property    Alignment: TAlignment read GetAlignment write SetAlignment default taCenter;
     property    BackgroundColor;
     property    BorderStyle;
+    property    Enabled;
     property    FontDesc: string read GetFontDesc write SetFontDesc;
     property    Height;
     property    Hint;
@@ -183,6 +185,7 @@ type
     property    Alignment: TAlignment read GetAlignment write SetAlignment default taLeftJustify;
     property    BackgroundColor;
     property    BorderStyle;
+    property    Enabled;
     property    FontDesc: string read GetFontDesc write SetFontDesc;
     property    Height;
     property    Hint;
diff --git a/src/gui/fpg_popupcalendar.pas b/src/gui/fpg_popupcalendar.pas
index af27568b..30171661 100644
--- a/src/gui/fpg_popupcalendar.pas
+++ b/src/gui/fpg_popupcalendar.pas
@@ -227,6 +227,7 @@ type
     property    DateFormat: string read FDateFormat write SetDateFormat;
     property    DateValue: TDateTime read FDate write SetDateValue;
     property    DayColor: TfpgColor read FDayColor write SetDayColor;
+    property    Enabled;
     property    FontDesc;
     property    Hint;
     property    HolidayColor: TfpgColor read FHolidayColor write SetHolidayColor;
diff --git a/src/gui/fpg_progressbar.pas b/src/gui/fpg_progressbar.pas
index ee6b2405..031117fb 100644
--- a/src/gui/fpg_progressbar.pas
+++ b/src/gui/fpg_progressbar.pas
@@ -61,6 +61,7 @@ type
   TfpgProgressBar = class(TfpgCustomProgressBar)
   published
     property    BackgroundColor default $c4c4c4;
+    property    Enabled;
     property    Hint;
     property    ShowCaption;
     property    Max;
diff --git a/src/gui/fpg_radiobutton.pas b/src/gui/fpg_radiobutton.pas
index 9410a000..61c8df6e 100644
--- a/src/gui/fpg_radiobutton.pas
+++ b/src/gui/fpg_radiobutton.pas
@@ -64,6 +64,7 @@ type
     property    AutoSize: boolean read FAutoSize write SetAutoSize default False;
     property    BackgroundColor;
     property    Checked: boolean read FChecked write SetChecked default False;
+    property    Enabled;
     property    FontDesc: string read GetFontDesc write SetFontDesc;
     property    Hint;
     property    BoxLayout: TBoxLayout read GetBoxLayout write SetBoxLayout default tbLeftBox;
diff --git a/src/gui/fpg_tab.pas b/src/gui/fpg_tab.pas
index 9999fa83..b33862c5 100644
--- a/src/gui/fpg_tab.pas
+++ b/src/gui/fpg_tab.pas
@@ -71,6 +71,8 @@ type
     property    PageControl: TfpgPageControl read FPageControl write SetPageControl;
     property    TabVisible: boolean read FTabVisible write FTabVisible;
   published
+    property    BackgroundColor;
+    property    Enabled;
     property    Text: string read GetText write SetText;
     property    OnPaint;
   end;
@@ -145,6 +147,7 @@ type
   published
     property    ActivePageIndex: integer read GetActivePageIndex write SetActivePageIndex;
     property    BackgroundColor;
+    property    Enabled;
     property    FixedTabWidth: integer read FFixedTabWidth write SetFixedTabWidth default 0;
     property    FixedTabHeight: integer read FFixedTabHeight write SetFixedTabHeight default 21;
     property    Hint;
diff --git a/src/gui/fpg_trackbar.pas b/src/gui/fpg_trackbar.pas
index 524a4c4c..204b4407 100644
--- a/src/gui/fpg_trackbar.pas
+++ b/src/gui/fpg_trackbar.pas
@@ -116,6 +116,7 @@ type
     destructor  Destroy; override;
   published
     property    BackgroundColor;
+    property    Enabled;
     property    Position: integer read FPosition write SetTBPosition default 0;
     property    ScrollStep: integer read FScrollStep write FScrollStep default 1;
     property    Min: integer read FMin write SetMin default 0;
diff --git a/src/gui/fpg_tree.pas b/src/gui/fpg_tree.pas
index b7dc5991..7e028c79 100644
--- a/src/gui/fpg_tree.pas
+++ b/src/gui/fpg_tree.pas
@@ -236,6 +236,7 @@ type
     property    PopupMenu: TfpgPopupMenu read FPopupMenu write FPopupMenu;
   published
     property    DefaultColumnWidth: word read FDefaultColumnWidth write SetDefaultColumnWidth default 15;
+    property    Enabled;
     property    FontDesc: string read GetFontDesc write SetFontDesc;
     property    IndentNodeWithNoImage: boolean read FIndentNodeWithNoImage write SetIndentNodeWithNoImage default True;
     property    NoImageIndent: integer read FNoImageIndent write FNoImageIndent default 16;