anchor.diff:    wc.AddProperty('ShowHint', TPropertyBoolean, '');
     wc.AddProperty('TabOrder', TPropertyInteger, 'The tab order');
     wc.AddProperty('Text', TPropertyString, 'Initial text');
  +  wc.AddProperty('TextColor', TPropertyColor, '');
     wc.WidgetIconName := 'vfd.radiobutton';
     RegisterVFDWidget(wc);
   
     // ComboBox
     wc          := TVFDWidgetClass.Create(TfpgComboBox);
     wc.NameBase := 'ComboBox';
  +  wc.AddProperty('BackgroundColor', TPropertyColor, '');
  +  wc.AddProperty('Enabled', TPropertyBoolean, '');
     wc.AddProperty('FontDesc', TPropertyFontDesc, 'The font used for displaying the text');
     wc.AddProperty('Hint', TPropertyString, 'Tooltip hint');
     wc.AddProperty('Items', TPropertyStringList, '');
     wc.AddProperty('ParentShowHint', TPropertyBoolean, '');
     wc.AddProperty('ShowHint', TPropertyBoolean, '');
     wc.AddProperty('TabOrder', TPropertyInteger, 'The tab order');
  +  wc.AddProperty('TextColor', TPropertyColor, '');
     wc.WidgetIconName := 'vfd.combobox';
     RegisterVFDWidget(wc);
   
     // Calendar ComboBox
     wc          := TVFDWidgetClass.Create(TfpgCalendarCombo);
     wc.NameBase := 'CalendarCombo';
  +  wc.AddProperty('BackgroundColor', TPropertyColor, '');
     wc.AddProperty('DateFormat', TPropertyString, 'Standard RTL date formatting applies');
  -  wc.AddProperty('FontDesc', TPropertyFontDesc, 'The font used for displaying the text');
  -  wc.AddProperty('Hint', TPropertyString, 'Tooltip hint');
  -  wc.AddProperty('ParentShowHint', TPropertyBoolean, '');
  -  wc.AddProperty('ShowHint', TPropertyBoolean, '');
  +  wc.AddProperty('DayColor', TPropertyColor, '');
  +  wc.AddProperty('Enabled', TPropertyBoolean, '');
  +  wc.AddProperty('FontDesc', TPropertyFontDesc, 'The font used for displaying the text');
  +  wc.AddProperty('Hint', TPropertyString, 'Tooltip hint');
  +  wc.AddProperty('HolidayColor', TPropertyColor, '');
  +  wc.AddProperty('ParentShowHint', TPropertyBoolean, '');
  +  wc.AddProperty('SelectedColor', TPropertyColor, '');
  +  wc.AddProperty('ShowHint', TPropertyBoolean, '');
  +  wc.AddProperty('TabOrder', TPropertyInteger, 'The tab order');
     wc.AddProperty('WeekStartDay', TPropertyInteger, '0 = Sun, 1 = Mon, etc.');
  -  wc.AddProperty('TabOrder', TPropertyInteger, 'The tab order');
     wc.WidgetIconName := 'vfd.combodateedit';
     RegisterVFDWidget(wc);
   
     // Calendar ComboBox Checkbox
     wc          := TVFDWidgetClass.Create(TfpgCalendarCheckCombo);
     wc.NameBase := 'CalendarCombo';
  +  wc.AddProperty('BackgroundColor', TPropertyColor, '');
     wc.AddProperty('Checked', TPropertyBoolean, 'Boolean value');
     wc.AddProperty('DateFormat', TPropertyString, 'Standard RTL date formatting applies');
  -  wc.AddProperty('FontDesc', TPropertyFontDesc, 'The font used for displaying the text');
  -  wc.AddProperty('Hint', TPropertyString, 'Tooltip hint');
  -  wc.AddProperty('ParentShowHint', TPropertyBoolean, '');
  -  wc.AddProperty('ShowHint', TPropertyBoolean, '');
  +  wc.AddProperty('DayColor', TPropertyColor, '');
  +  wc.AddProperty('Enabled', TPropertyBoolean, '');
  +  wc.AddProperty('FontDesc', TPropertyFontDesc, 'The font used for displaying the text');
  +  wc.AddProperty('Hint', TPropertyString, 'Tooltip hint');
  +  wc.AddProperty('HolidayColor', TPropertyColor, '');
  +  wc.AddProperty('ParentShowHint', TPropertyBoolean, '');
  +  wc.AddProperty('SelectedColor', TPropertyColor, '');
  +  wc.AddProperty('ShowHint', TPropertyBoolean, '');
  +  wc.AddProperty('TabOrder', TPropertyInteger, 'The tab order');
     wc.AddProperty('WeekStartDay', TPropertyInteger, '0 = Sun, 1 = Mon, etc.');
  -  wc.AddProperty('TabOrder', TPropertyInteger, 'The tab order');
     wc.WidgetIconName := 'vfd.combodatecheckedit';
     RegisterVFDWidget(wc);
   
  
positive.code:   // Bevel
    wc           := TVFDWidgetClass.Create(TfpgBevel);
    wc.NameBase  := 'Bevel';
    wc.AddProperty('BorderStyle', TPropertyEnum, 'Single or Double');
    wc.AddProperty('Hint', TPropertyString, 'Tooltip hint');
    wc.AddProperty('ParentBackgroundColor', TPropertyBoolean, '');
    wc.AddProperty('ParentShowHint', TPropertyBoolean, '');
    wc.AddProperty('Style', TPropertyEnum, 'Raised or Lower look');
    wc.AddProperty('Shape', TPropertyEnum, 'Box, Frame, TopLine, Spacer etc..');
    wc.AddProperty('ShowHint', TPropertyBoolean, '');
    wc.WidgetIconName := 'vfd.bevel';
    wc.Container := True;
    RegisterVFDWidget(wc);
  
negative.code:   // StringGrid
    wc := TVFDWidgetClass.Create(TfpgStringGrid);
    wc.NameBase := 'Grid';
    wc.AddProperty('AlternateBGColor', TPropertyColor, 'The color of every alternative row. Dependent on grid Options property.');
    wc.AddProperty('BackgroundColor', TPropertyColor, '');
    wc.AddProperty('Columns', TPropertyDBColumns, 'Defines the various columns for a grid. At least one column must exist.');
    wc.AddProperty('Enabled', TPropertyBoolean, '');
    wc.AddProperty('FontDesc', TPropertyFontDesc, 'The font used for displaying the text');
    wc.AddProperty('HeaderFontDesc', TPropertyFontDesc, '');
    wc.AddProperty('Hint', TPropertyString, 'Tooltip hint');
    wc.AddProperty('ParentShowHint', TPropertyBoolean, '');
    wc.AddProperty('RowCount', TPropertyInteger, 'Default number of rows in the grid');
    wc.AddProperty('RowSelect', TPropertyBoolean, 'If enabled, a whole row is selected, not just a cell');
    wc.AddProperty('ShowGrid', TPropertyBoolean, 'Must the grid lines be shown');
    wc.AddProperty('ShowHeader', TPropertyBoolean, 'Must the grid header be visible');
    wc.AddProperty('ShowHint', TPropertyBoolean, '');
    wc.AddProperty('TabOrder', TPropertyInteger, 'The tab order');
    wc.WidgetIconName := 'vfd.stringgrid';
    RegisterVFDWidget(wc);
  