anchor.diff:    xpsilver := TThemeButton.Create(self);
     xpsilver.Left       := 230;
     xpsilver.Top        := 45;
  -  xpsilver.Width      := 75;
  +  xpsilver.Width      := 85;
  +  xpsilver.Height     := 28;
     xpsilver.Text       := 'XP Silver (+)';
     bmp := LoadImage_BMP(SetDirSeparators('../../../images/themes/silver/button.bmp'));
     xpsilver.ThemeImage := bmp;
  
positive.code:   xpluna := TThemeButton.Create(self);
    xpluna.Left         := 80;
    xpluna.Top          := 45;
    xpluna.Width        := 75;
    xpluna.Text         := 'XP Luna (-)';
    xpluna.Masked := True;
    xpluna.OnClick := @ButtonClicked;
  
negative.code:   vista.ThemeImage := bmp;
  
    styledbutton := TStyledButton.Create(self);
    styledbutton.SetPosition(btnClose.Left, btnClose.Top-80, 80, 24);
  //      styledbutton.Default := True;
    styledbutton.ImageName := 'stdimg.quit';
    styledbutton.ShowImage := True;
    styledbutton.Text := 'Styled';
  end;
  
  